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RAPHIC TEST PROGRAM MACYI1 2711006) O&-DEC-76 


~ TITLE MAINOEC-11-O2VSE-A VSVC1 VIEDO 
s®COPYRIGHT (C) 1976 

:*OIGITAL EGUIPMENT CORP. 

pba mass. 01754 


;SPROGRAA BY RAYMOND SHOOP 


SeTHIS PROGRAM WAS ASSEMBLED ee THE af es 


i #PRCKAGE (MAINDEC-11-DZQAC-C2}, SEPT 1 
‘Ssrte BASIC DEFINITIONS 


iSINITIAL ADDRESS OF THE STACK POINTER ### 1100 #e# 
-EGUIV EMT ERROR ::BASIC DEFINITION OF ERROR ¢ 
“EQUIV IOT. SCOPE >:BASIC DEFINITION OF SCOPE ¢ 
p SMISCELLANEOUS DEFINITIONS 

urs :;CODE FOR HORIZONTAL TAS 

LF= i2 ;3CODE FOR LINE FEED 

CR= 15 : CODE FOR CARRIAGE RETU 

CRLF= 200 CODE FOR CARRIAGE RE TUEN-LINE FEED 

25-5 ::PROCESSOR STATUS WORD 
“EQUIV PS. PSW 

STKLMT= 177774 ;;STACK LIMIT REGISTER 

PIRG= 177772 ::PROGRAM INTERRUPT REQUEST REGISTER 

pswR= 177570 :HARDWARE SWITCH REGISTER 

DDIsP= 177570 : HARDWARE DISPLAY REGISTER 
;#GENERAL PURPOSE REGISTER DEFINITIONS 

RO= “9 ;;GENERAL REGISTER 

Ris %1 ::GENERAL REGISTER 

Re= “2 >:GENERAL REGISTER 

= “2 ;;GENERAL REGISTER 

R= “4 >: GENERAL REGISTER 

RS= “S ::GENERAL REGISTER 

Ré= “ ::GENERAL REGISTER 

R?= “? ::GENERAL REGISTER 

SP= % ::STACK SOINT 

Pcs “7 :: PROGRAM COUNTER 
-*#PRIORITY LEVEL DEFINITIONS 

Pro=z si : PRIORITY LEVEL 0 

PRiz 40 i PRIOR ITY LEVEL 1 

PRo= 100 ::PRIORITY LEVEL 2 

PR3= =: 140 :;PRIORITY LEVEL 3 

PRH= 200 ::PRIORITY LEVEL 4 

PRS= 240 :: PRIORITY LEVEL 5 

PRE= «31000 s SPRIORETY LEVEL & 

PR7= 39-340 :PRIORITY LEVEL 7 
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s RESERVED AND ILLEGAL INSTRUCTIONS 


;; TIME OUT AND OTHER ERRORS 


BIT90 TO BITIS) 
saat had BI 
;;TRACE TRAP 
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SvDi VIEDC GRAPHIC TEST PROGRAM MACY11 27(1006) O8-CEC-76 17:43 PAGE 4 
BASIC DEFINITIONS 
SFT vEc= is ::BREAKPOINT TRAP (SPT) 
ToTVer= 30 SHINPUT/OUTPUT TRAP (IOT) seScOFEss 
FURVES= 3 WER FAIL 
EMTVEr= 30 i EMULATOR TRAP (EMT) #*ERRORss 
TRAPVECS 34 TRAP” TRAP 
TkVEC= &0 1 KEYBOARD VECTOR 
TEyEr= 64 itt PRINTER VECTOR 


FIRS VECss4o 7;PROGRAM INTERRUPT REGUEST VECTOR 


| MAINDEC-12-DovSE-A vSVOi VIEDO GRAPHIC TEST PROGRAM MACYL1 27; 1006) 





C2VSEA.P11 | OS-Sun-7 00:00 BASIC DEFINITIONS 
121 172600 ABASE=172690 
158 *3E5E5 AVECTIS100360 
123 695260 APRIOR=200 
134 909503 ADEVM=3 
126 -SBTTL OPERATIONAL SWITCH SETTINGS 
te i} SUITCH USE 
185 ee  aemeete > ©) Sa aeeeeeen enn 
730 te 15 HALT ON ERROR 
233 1% 14 LOOP ON TEST 
735 2+ 13 INHIBIT ERROR TYPEOUTS 
233 + 12 INHIBIT SUB-TEST DELAY 
134 4 10 INHIBIT VISUAL SYNC/CHARACTER TEST PATTERNS 
i3s + g LOOP ON TEST IN SWR<7:0> 
23 + g TRHIBIT VISUAL BIT MAP TEST PATTERNS 
137 *SBTTL TRAP CATCHER 
3 poo0oc 
130 PALL UNL aise LOCATIONS FROM 4 - 776 CONTAIN A “.42,HALT™ 
tay ;#SEQUENCE TO CATCH ILLEGAL TRAPS AND INTER RUPTS 
ise athe sande § CONTAINS 0 TC CATCH IMPROPERLY LOADED VECTORS 
144 po0174 da9500 DISPREG: - WORD 0 :s SOF THARE DISPLAY REGISTER 
145 505176 900906 SWREG: 0 ::SOFTWARE SWITCH REGISTER 
ie “SBTTL STARTING ADDRESS(ES) 
147 909200 900137 00157 IMP QSBEGIN ;;JUMP TO STARTING, ADDRESS OF PROGRAM 
is coceoy 000137 o1SsHe Ne aHATCH ISPLAY CR CROSS HATCH PATTERN op 
is paastg eich stad IMP pacRce preety KRO2e ff He tRe ff WITH one MAPS 
15: O0d220 900137 01564 Imp SURNIN ; JUMP TO SET “BURNIN” MODE FLAG 
152 800224 Oo0137 oleae TMP BUSOLUT : JUMP re BUS TIME-OuT LOOP 
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ME INDECS11-O2V$E-8 vSVOi VIEDO GRAPHIC TEST PROGRAM MACYLL 27( 1006) 
j DIVSEA. ii me UN-. 7e 0 -< :00 acT1i HOOK Ss 
282 SETTL ACTII HOOKS 
132 5 SERARELERAESSEASFEALALELALELELESFFSELESLELRLLELEFERSEFSFLFFLEFSSELRFSSE 
i3é ;HOCKS REQUIRED BY ACTI! 
905230 $SVPC=. ;SAVE PC 
D50546 46 
iE sooo 863504 SENDAD ;1)SET LOC.46 TO ADDRESS OF SENDAD IN .S£0F 
fi ocose Sn5s5 “ORO 0 ;2)5ET LOC.52 TO ZERO 
* ee —* ~ ie . 3 
elalat cle “SgSvPC i RESTORE 
sc 90:580 .=1000 
ie5 .SBTTL APT PARAMETER BLOCK 
$5 = SELLLESLSRSAALALRELA LEELA H SE KAALEERLEL ELE RLLFLALEFERAFALELLELFLFE FAS 
iss Ser LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
255 “ speeges Sagar gc > emcernaecctaent tapramuminte ss” 
iE5 p91090 .$X=. 3 ;SAVE CURRENT LOCATION 
i797 OEM rs24°ISET POWER FAIL 10 POINT TO START OF PROGRAM 
172 200024 9S00200 200, 3 3E0R APT START UP 
ve a POINT TO APT INDIRECT ADDRESS PNTR. 
s73 Oocow §Boihco SAPTHOR : {POINT TO APT HEADER BLOCK 
i74 oc1005 $X ;;RESET LOCATION COUNTER 
i/s «REESE 0 EE REESERERAERELAELEE 
176 :SET TUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
7 ; INTERFACE SPEC. 
179 010 PPTHD: 
té¢ BEi58 ooo000 Surevs: .woRD 9 ;;TWO HIGH BITS OF 18 BIT MAILBOX ADOR. 
181 901002 901172 SMBADR: .WORD SMAIL ;;ADDRESS OF APT MAILBOX (BITS 0-15) 
182 01004 990000 STSTM: WORD :;RUN TIM OF LONGEST TEST 
183 001906 900000 SPASTM: |< WORD ;;RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (GUICK VERIFY) 
184 991018 900900 SUNITM: :WORD SADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADOSTICNAL UNIT 
18S 9561532 990032 "WORD © SETEND-SMAIL 72 ;;LENGTH MAILBOX-€TASLE (WORDS) 





| MAINDEC<1i-DovSE-8 VEVOl VIEDO GRAPHIC TEST PROGRAM MACY11 27(1906) O&-DEC-7— 17:43 FaGE 7 
| DIVSER. Fil Ge-sUN-"6 OO: U0 COMMON TAGS 


188 .SETTL COMMON TAGS 
tes ireTe TRE CONTAIME WORIGL COMMON ETOREKE LOCATION 
igs ($THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 

iz :#USED IN THE PROGRAM. 

1$2 002100 21100 

163 901150 SCMTAG: »:START OF COMMON TAGS 

18} 961150 oococo .WORD 0 

1s¢ 503152 069 STSTNM: {BYTE 0 :;CONTAINS THE TEST NUMBER 

196 901103 SERFLG: .BYTE 9 ss CONTAINS ERROR F 

is? 561046 599 SICNT: .WO 9 : CONTAINS EPBTEST” ITERATION COUNT 
198 OC1:de san5o9 SLPADR: .WORD 0 :! CONTAINS SCOPE LOOP ADDR’ 

199 SOli190 adgcose SLPERR: -WORD 9 ::CONTAINS SCOPE RETURN FOR ERRORS 
290 001112 SERTTL: .WORD 6 ::CONTAINS TOTAL ERRORS DETECTED 
251 SO11i4 SITEMS: -BYTE ::CONTAINS ITEM CONTROL BY? 

202 OO1lis 00: SERMAX: .BYTE 1 :sCONTAINS 1 MAX. ERRORS PER TEST 
203 901116 o00000 SERRPC: WORD 0 ::CONTAINS PC OF LAST ERROR INSTRUCTION 
254 O01120 900 SGDADR: :WORD 0 :: CONTAINS ADDRESS OF GOOD’ DATA 
255 OOllee 999000 SBDADR: .WORD :: CONTAINS ADDRESS OF *BAD’ Da 

206 O01124 po09n0 SGDODAT: WORD 0 S:CONTAINS * GOOD" DATA 

207 001126 05000 SBDDAT: .WORD © :CONTAINS *BAD’ DATA 

208 001130 0900005 “WORD «9 : SRESERVED--NOT TO BE USED 

209 O51132 090000 “WORD «0 

210 901134 995 SAUTOB: .BYTE 0 ; ;AUTOMATIC MODE INDICATOR 

211 501135 060 SINTAG: .SYTE 0 LINTERRUPT MODE INDICATOR 

212 001136 oo0000 ‘WORD 0 

2:3 901140 1 ds SUR: WORD SUR nets OF SWITCH REGISTER 

215 OOll42 1 DISPLAY: .WORD DDISP !:ADDRESS OF DISPLAY REGISTER 

2i5 OO1l44 177560 $TKS: 177560 si TY KBD STATUS 

21E OO1146 177562 $TKB: 177562 Y KBD BUFFER 

217 OO11S0 177564 $TPS: 177564 ;TTY PRINTER STATUS REG. ADDRESS 
2i8 OO1152 i775 STPB: 177566 ai PRINTER BUFFER REG. ADD 

219 903154 598 SNULL: .BYTE 0 CONTAINS NULL CHARACTER FOR FILLS 
220 OO11ss 02 SFILLS: .BYTE = ::CONTAINS ® OF FILLER CHARACTERS REGUIRED 
22; OOL156 Sle SFILLC: .BYTE ie :: INSERT FILL CHARS. AFTER A “LINE FEED 
eee 901157 STPFLG: .BYTE 0 "TERMINAL AVAILABLE” FLAG (BIT<O7>=0=vES) 
223 01160 200009 SREGAD: .WORD 0 : CONTAINS THE ADDRESS FROM 

224 WHICH (SREGO) WAS OBTAINED 

ees O01162 o90000 SREGO: .WORD 0 CONTAINS (($REGAD) +0) 

226 OO11E4 90900 $REGI: .WORD O ; CONTAINS (CSREGAD) +2) 

227 OOLIEE 577 SQUES: :ASCII 777 ; QUE UESTION 

222 001167 515 SCRLF: .ASCI? <15> i; CARRIAGE RETURN 

225 80170 ooodi2 SLF: ASCIZ <12> INE F 

230 LS EEEEEERUSERSESRERERORSERSEEEEEEERUEEEEEEEEEEEESEEEEEEEEERTES4 
ez) ‘2STTL APT MAILBOX-ETABLE 

csi  ihistoeectson nn aemsnmnt Corre CRI oi 
Fd EVEN 

235 001172 SMAIL: : APT MAILBOX 

236 991172 oooo00 SMSGTY: .WORD AMSGTY  SMESSAGE T YPE CODE 

227 091174 900000 SFATAL: .WORD AFATAL ;:FATAL ERROR NUMBER 

228 901176 oo0000 STESTN: .WORD ATESTN ::TEST NUMBER 

2239 901200 oo0000 SPASS: ‘WORD APASS ::PASS COUNT 

240 S0i202 scocc0 SCEVCT: :WORD ADEVCT DEVICE COUNT 


e4i 001204 900000 SUNIT: .WORD AUNIT 31/0 UNIT NUMGER 
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maINDEC= oil-D2vSE-A vSV02 VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006i) O2-DEC-7E 17:42 PAGE 2 
| O2v 11  O2-Jun-76 0 APT MAILBOX-E TABLE 
| pee oo1e06 900c00 $MSGAD: .WORD  AMSGAD : MESSAGE ADDRESS 
243 51210 559009 SMSGLG: .WORD AMSGLS ; MESA GE LENGT 
244 O01z212 SETABLE: ::APT EN VIRONMENT TABLE 
245 OOlzle 090 SENV: .BYTE AENV  ::ENVIRONMENT BYTE 
246 951533 aiale) SENVM: “BYTE AENVM ; SENVIRONNENT MODE BITS 
Sug Sbisie pesos SeerRe’ “WORD «USM? | TIUSER SUTTCHEE 
45 5a7838 BERRSS SCPUOP: ZWOR aati : > CPU 19PE SP fons | 
osc :* BtTS iS-11=CPU TYPE 
25! :& 11704201, 11/0S=02, 11/20=03, 11740204, 11 45=05 
=Se :% tt 70s 06'PD0=07, d=10 
253 :% BIT 10=RE "CLO 
254 1% BIT 9= FLORTING. POINT PROCESSOR 
= +» BIT ®B=MEMORY MANAGEM 
256 o01222 900 émamsi: .BYTE AMAMS] :;HIGH QODRESS N.S. Sete 
257 OOless fslaia SMTYP1: .BYTE AMTYP] ::MEM. TYPE. BLKal 
2ce :# fem. TvPE BYTE -- (HIGH BYTE) 
253 1% 990 NSEC CORE=001 
z50 te 300 NSEC BIPOLAR=002 
251 +" 500 N NSEC HOS= 903 
ese 001224 00000 $MADR1: .WORD AMADRI ssHIGH ADDRESS K#l E 2 
263 . # "MEM. 7 AODA.= =3 BYTES, THIS WORD AND LOW OF “TYPE” ABOVE 
264 901226 005 émams2: .BYTE AMAMS2 5 HIGH” ALORESS .S. BYTE 
265 991227 9995 SMTYP2: .BYTE AMTYPe Ha TY 
266 901230 000000 ADRe: [WORD  AMADRe LAST. ADDRESS, BLK ae 
267 951232 690 SMAMS3: .BYTE AMAMSS ADDRESS 
268 001233 alata} SMTYP3: .BYTE aT YE3 ge YPE BL a 
263 901234 000099 SMADR3: -WORD AMADRS 3 ;MEM. Las ADDRESS, BLK #2 
270 001226 909 SMAMSY: |BYTE AMAMSH DRESS,M.S.BYTE 
27: 001237 SMTYP4: |BYTE AMTYPY Nene - 
272 aeleleiels MADRY: .WORD  AMADRY jsMEM. LAST ADDRE 
Soa Soleus ApbaBS SVECTS: “LORD  AVEETS STINTERRUPT ee us PRIORITY He. 
275 SOlS4E reget Hate “WORD ABASE nee E ADDRES F EQUIPMENT UNDER TEST 
575 Borges Sopnos Sco: WORD ACDWL CONTROLLER PTION WORDS 
(4 eo c $ . 3 
=7E BR Es tisifeeid acpi: “WOR Bepis 23C SONTROLLER Beek RIT ION WORDEE 


273 001256 SETEND: 
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| MBINDEC-i1-D2vSE-8 VSVOL VIEDO GRAPHIC TEST PROGRAM MACYIL1 271006) O2-DEC-76 17:42 PAGE 3 
DIVSER.P11 Ce-suN-7& 00:08 ERROR POINTER TABLE 
21 .SBTTL ERROR POINTER TABLE 
563 ;*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN gccuR. 
=e STHE INFORNGT ION IS OBTAINED BY USING THE INDEX NUMBER FOUND 7 ; 
8S isLOCRTION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE Tree IS PERTINENT. 
386 TEL: IF S$ITEMB 1s 0 THE ONLY PERTINENT ATA IS. (SE 
87 SNOT 3; EACH ITEM HE TABLE CONTAINS 4 POINTERS SEER Saeo AS FOLLOWS: 
ze8 1* ty +:POINTS TO THE ERROR MESSAGE 
265 ts 5H POINTS TO THe DATA HEADER 
28} 1% OT ::POINTS TO THE DATA 
eae ty OF :POINTS TO THE DATA FORMAT 
534 
25 o01256 SERRTB: 
2se 
227 sITEM 1 
299 O0125E 922032 EM! “BUS ERROR TRAP ON CHARACTER ADDRESSES 
309 901260 024004 DHI : ERRPC 
301 O0le6e De4ec¢ oT! :$ERRPC $BODAT 
258 001264 24322 DFO 
304 sITEM 2 
305 001266 022133 EM2 :BUS ERROR TRAP ON BIT MAP ADDRESSES 
a6 O5le70 Seqoo4 OHI “ERRPC ADR 
207 O01272 Gpyzze DT : SERRPC SBODAT 
zs 001274 de4322 OFO 
3} sITEM 3 
311 001276 023214 ae :CHARACTER STATUS REGISTER ERROR 
Se £51365 Bey pee BH :BRREC Weep gop R aT ged paT 
214 001304 de43e2 DFO 
316 : F SITEM 4 
36 Biars S5acae vy RecA RYN ERO | TIMEL 
3i9 O01212 ceufue OTY :SERRPC VCCSR SAVED SAVEL 
EC 001314 De¥3e2 FO 
322 sITEM 5 
3-3 001316 023300 EMS ; VERTICAL SYNC ERROR/ 
334 001320 024135 CHS !ERRPC VOCSR 
325 001322 924260 OTS FERRE C VCCSR 
26 801324 De4322 FO 
328 9012 23 bit ut :BIT MAP STATUS REGISTER ERROR 
ai seb Assit HE ERRPC ADR GOOD BAD 


:SERRPC VGCSR $GDDAT $BODAT 





e 60:334 d24322 DFO 


ee re ee ee eee 
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MAINDEC-11-D2VSE-A vSVO: VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006) O2-DEC-76 17:42 PAGE 10 
D2VSEA.P11  S2-JuN-7 00:09 ERROR POINTER TABLE 
$3 ITEM 7 
He | 

#3 001236 623374 EM? :BIT MAP P.C. SEGISTER ERROR 

| 337 901340 924151 DHE sERRPC  YGCSR GOOD 
238 O01342 Dosdee NTE :SERRPC VGCSR  $GDOAT SetpAt 

333 901344 24322 DFO 
34] :ITEM 10 
342 901346 023426 EM10 :BIT MAP P.C INCREMENT ERROR 
243 0013250 o24151 SHE -ERRPC VGCSR GOOD BAD 

| 344 O01352 So4ské OTE ‘SERRPC YGCSR §GODAT $8DDAT 

| = 34S 001354 024322 DFO 
346 

| Su 001356 o23465 oer: em :WORD ERROR ON PIXEL BIT 9 

| 9349 001360 924151 DHE “ERRPC VGCSR GOOD BAD 

| 350 O01362 d24266 DT :SERRPC VGCSR §GDDAT $BDDAT 
zi 001364 de43z2 OFO 

| 353 sITEM le 

| «354 «001366 022524 EMle :BYTE ERROR Qn PIXEL BIT O 

' = 355001270 02415) DHE “ERRPC YGCSR GOOD BAD 
356 001372 do4Déé OT :$ERRPC VYGCSR §GDDAT $SDDAT 

| 3S? 001374 24322 DFO 

| 366 

| 3 on: 2563 TH 3 “CHARACTER READY ERROR 

37 14 Gys] H tERRPC VCCSR GOCD BAD 
262 O01402 d24256 OTS -SERRPC VCCSR $GDDAT $8DDAT 
363 091404 O24322 DFO 

cc aa :ITEM «14 

| 366 OD140E 02361: Em14 sBTT, NAP READY ERROR 

«BE? «-OOL4ID §=OD4Is1 HE vocsR a0 op Bap 7 
368 OO1412 goudbe TE ER EREC VGCSR AT $BDpDA7 
365 001414 24322 DFO 

i 37] sITEM 15 

| 373 OO1416 02361! EM14 :BIT MAP READY FAILED TO SET 

_ 373 001420 24176 DHIS ‘ERRPC VGCSR 

| 374 o01422 024300 OTIS “$ERRPC SVGCSR 

| 75 901424 24322 OFO 
377 :ITEM 16 
378 OC1426 023635 EMI6 sPREVIOUSLY EXISTING BIT MAP DOES NOT EXIST NOW 
379 001430 d24212 DHIE “ERRPC VSVO1 
280 001432 024306 OTIS “SERRPC $BDDAT 

321 001434 24322 OFO 
383 sITEM 17 
284 001436 023714 EMI7 sPREVIOUSLY EXISTING YTVOl CONTROLLER DOES NOT EXIST NOW 
385 O91440 Oe4e!e2 DHIs VSVO1 


iE 
:SERRPC $GDAOR 
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:VTVO1 BUS ADDRESSES AND VECTOR 
.SBTTL VSVO1 BUS ADDRESSES AND VECTORS 
: ABASE 


VCINT: 
VCINTi: 


sMISC. 


MSAVEY: 


Ova 
££ 
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ERROR FOINTER TABLE 


: ABASE+24 
: ABASE+30 


AVECT1 
AVECTI +2 


LOCATIONS 


-SBTTL MISC. LOCATIONS 


oO 
uw 


OOO0000r-O00 
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. . : S 





MACY11 27¢ 10063 


;ASCII CHARACTER USED IN FULL SCREEN PATTERN 


R 
C 


om 


AY CONTACTS IN “BURN-IN” MODE 
X SWITCH 








DZVSE 


| 
| 
| 
| 
| 


MRINDEC-11-D2VSE-A 


SEA.P11 


O2-JUN-"é C 


005237 
009402 
005037 





001544 
ocis44 


001100 
001140 


001760 
000176 
000174 
oocco4 


001200 
008200 


001214 


peg) VIEDC GRAPHIC TEST PROGRAM 
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001140 
001142 


001213 
001140 
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MACY11 27( 1006) 
MISC. LOCATIONS 


BURNIN: be BURN ;SET BURN-IN MOCE FLAG 
ore CLR SURN ;CLEAR “BURN-IN “ MODE FLAG 


CONT 
SBTTL INITIALIZE THE COMMON TAGS 
;; CLEAR i COMM a3 Me ($CMTAG) AREA 


TAG, Re ;;EIRST LOCATION TO BE CLEARED 
CLR (R&)+ > CLEAR MEMORY LOCATION 
CMP #SWR,R& ;;DONE? ” 
BNE .-6 LOOP BACK IF NO 
MOV #STACK, SP TEP TUP THE STACK POINTER 
ss INITIALIZE A FEW VECTORS 
MOV #SSCOPE GRIOTVEC :IOT VECTOR FOR SCOPE ROUTINE 


MOV #340, a8lOT Ce 3 VEL ? 

MOV #SERROR Seat C’:;EMT VECTOR FOR ERROR ROUTINE 
MOV #340, JHEMTVEC+2 ; LEVEL ? 

MOV STRAP O#TRAPVEC ;;TRAP_VECTOR FOR TRAP CALLS 


+2;LEVEL 
MOV #SPWRON meet ;POWER_ FAILURE VECTOR 
MOV SENDCT SEOPCT ::SETUP END-OF-PROGRAM COUNTER 


MOV ‘INITIALIZE THE LOOP ADDRESS FOR SCOPE 
:;SIZE FOR a HARDWARE SUT TCH egittth’ IF NOT FOUND OR IT IS 


::EQUAL TO a "1". SETUP FOR A SOFTWARE SWITCH REGISTER. 
MOV abeRnvec (SP); 33 SAVE ERROR VECTOR 
MOV ab4s VEE RRVEC SET UP ERR 


OR VECTOR 
3; SETUP F R A HARDWARE SWICH REGISTER 


MOV 
MOV s0D 1s? DISPLAY ;;AND A AAR DWARE ge REGISTER 
CMP #-1, aSUR HIRY. TO REFERENCE HARDWARE SWR 
BNE 66S ; BRAN CH IF NO TIMEOUT TRAP OCCURRED 
ND THE oS SWR IS NOT = -1 
BR 65$ 4d IF NO TIMEOUT 
64S: wy #65$, (SP) ;;SET UP FOR TRAP RETURN 
65$: MOV ;;POINT TO SOFTWARE SWR 


MOV sOtepRES. RISPL AY 
BES: MOV (SP}+, SatRRVEC ; RESTORE ERROR VECTOR 


CLR SPASS ;;CLEAR PASS COUNT 
BITB  s8APTSIZE, SENVM ii TEST USER SIZE UNDER gPT 
BEQ 67% tines USE NON-APT S 

oe MOV #$5WREG, SWR :NO,USE APT SWITCH REGISTER 
CLR MSAVEDO RESET MAP COUNTERS 
CLR MSAVE 1 
CLR MSAVE2 ; AND CONTROLLER 
CLR MSAVES 
CLR MSAVEY ; LOCATIONS 
TST Jee TEST IF IN CHAIN MODE 





TITLE 
RESTAT: RESET 








MAINDEC-11-D2VSE-A VSVO1 VIEDC GRAPHIC TEST PROGRAM MACYI1 27(1006) O2@-DEC-76 17:42 PAGE 13 
DZVSEA.P11  O2-JUN-7& 00:00 
492 .SBTTL i 
433 “SBTTL DETERMINE THE NUMBER OF CONTROLLERS TO TEST 
495 902062 012737 001246 001120 DETERO: MOV SBASE , SGDADR ;LOAD BASE ADDR. 
496 002070 012737 O92242 007366 MOV #458 RETURN “LOAD RETURN RDOR. AFTER TESTING 
497 902076 094737 903340 JSR C, DETECT ‘DETER MINE # 
498 902102 000453 BR aS’ :BR IF CONTROLLER DOESN’T EXIST 
499 002104 004737 003576 JSR PC LODADR ‘FIX THE BUS Al z 
500 9021i0 o0S737 001254 TST schWe2 ‘TEST IF THE OPERATOR HAS SELECTED SOME MAPS 
501 002114 001407 BEQ b$ ‘BR IF NOT 
S02 002116 013737 001254 o012S2 MOV SCDW2, SCDW1 “LOAD HIS SELECTION 
503 002124 052737 100000 oo1sS2 BIS #BITIS,MSAVEO ;SET CONTROLLER EXISTS FLAG 
504 002132 000430 BR 2$ iA NO TEST THEM ss 
50S 002134 105737 001213 6S: TSTB 3s SENVM TEST IF “DO NOT SIZE” IS SET 
506 002140 100007 BPL $ BR IF NOT 
£67 O02142 013737 001250 001252 MOV SDEVM, SCDW1 VALUE SUPPLIED BY “APT” 
£98 oO021S0 052737 100000 o01SS2 BIS #BITIS,MSAVEO  ;SET conthOrLER EXISTS FLAG 
509 002156 ooo4i6 BR 2g 
510 002160 005737 oo1200 cs: TST $PASS s TEST IF FIRST PASS 
511 OO2164 001006 BNE 1$ ‘BR IF NOT 
S12 00216 013737 oo1si2 oo1sse MOV SAVE! MSAVEO :SAVE THE NUMBER OF MAPS 
513 002174 052737 190000 601552 BIS #BIT15, MSAVED :SET “CONTROLLER oxIsts= FLAG 
514 O02202 123737 O01Si2 oo1s52 1S: CMPB oAvEL MSAVED :COMPARE IF ANY CHANGE IN & OF MAPS 
515 002210 001401 B § -BR IF NOT 
S16 OO2212 id4ole ERROR 16 :PREVIOUSLY EXISTING BIT MAP DOES NOT EXIST NOW 
£17 O0e214 012737 O00001 OOISHE 2S: MOV #1, COAXSW :LOA p SWITCH VALUE 
518 OO02222 905037 O001102 CLR STSTNM *RESET TEST # 
£19 O02226 000137 003762 IMP TSTl “AND TEST THIS CONTROLLER 
520 OO02232 005737 op1sS2 3S: TST MeAVED ;TEST IF CONTROLLER PRTETED AT ONE TIME 
S21 002236 100001 BPL Ug BR IF NO 
S22 002240 104017 ERROR 17 ; PREVIOUSLY ExIStiNG CONTROLLER AT 172600 DOES NOT EXIST NOW 
S23 002242 O00e40 4S: NOP 
524 o02244 005737 o015Se TST MSAVEO TEST IF THE IRS! CONTROLLER EXISTS 
E25 O02250 100413 BMI 10 ‘BR IF IT’S THERE 
526 O02252 012737 002274 001110 MOV #73, SLPERR *LOAD LOOP 
P59 DOSER OLTa7 Shioe DOLISE NOV Sante, SeoDAT ‘TOAD BASE "ADDRESS FOR TYPEOU 
258 paSSoE 104001 7$: ERROR ;#* FATAL ERROR *% TYO1 AT ADDRESS FSHASE) DOESN'T EXIST 
530 002276 000776 BR +5 ;FATAL E ROR 
531 002300 005737 o01544 10$: TST BURN :TEST IF “BURN-IN" MODE 
S32 002304 001002 BNE DETER :BR AND TEST FOR MORE MAPS 
533 002306 000137 003222 IMP DETEC7 “REPORT “EOP™ 
534 002312 012737 171600 001120 DETERI: MOV #171600, SGDADR ; LOAD BUS ADDRESS 
535 002320 012737 O02472 007366 MOV #4$, RETURN “LOAD RETURN ADDR. AFTER TESTING 
S36 002326 004737 003240 JSR Pc, DETECT :DETERMINE # OF 
537 O0e232 000453 BR 3 BR IF CONTROLLER DOESN’T EXIST 
538 002334 004737 003576 JSR PC, LODADR ‘FIX THE BUS ADDRESSES 
539 002340 005737 001254 TST scole2 :TEST IF THE OPERATOR HAS SELECTED SOME MAPS 
540 002344 001407 BEQ 6$ ‘BR IF NOT 
C41 00234 013737 001254 o0125e MOV SCDW2, $CDWI ‘LOAD HIS SELECTION 
S42 002354 052737 100000 o01554 BIS #BITIS,MSAVEL  ;SET CONTROLLER EXISTS FLAG 
543 002362 000430 BR AND TEST 
44 364 105737 001213 6S: TSTB Ss SENVM TEST IF “DO NOT SIZE” IS SET 
S4S 002370 100007 BPL c$ :BR IF NOT 
S46 002372 013737 o01250 o0125e2 MOV SDEVM, SCDWL USE VAL LE SUPPLIED BY “APT™ 


S47 002400 052737 100000 001554 BIS #BITIS,MSAVEL  ;SET CONTROLLER EXISTS FLAG 
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MAINOEC-11-DZVSE-A VSVO1 VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006)_ O2-DEC-7&6 17:43 PAGE 14 
DZVSEA.P11 O2-JUN-7& 03:00 DETERMINE THE NUMBER OF CONTROLLERS TO TEST 
S48 O0e40& O00416 BR es 
ae. eats Satan C01200 5$: oe $PASS ORT x! FIRST PASS 
4 
551 41 Bara 001512 001554 MOV aAve1 MSAVE1 THE NUMBER OF MAPS 
SSe O0e4%e4 052737 100000 001554 BIS WBIT1S, MSAVE1 ity “CONTROLLER EXISTS" FLAG 
a 002432 ath O001Sie O015S4 1S: CMPB . »MSAVEL ; COMPARE iF ANY CHANGE IN # OF MAPS 
Be Bosuue Padi ERROR l ; PREVIOUSLY Fire PING BIT MAP DOES NOT EXIST NOW 
RRS ee wong cose oe eae re 
558 O0e4%S6 000137 003762 JMP TST AND TEST THIS CONTROLLER 
5539 O0e%e 005737 001554 3$: TST MSAVE1 : TEST a CONTROLLER EXISTED AT CNE TIME 
560 002% 6 100001 BPL 4 :B 
S61 002470 104017 ERROR 17 PREVIOUSLY EXISTING CONTROLLER AT 171600 DOES NOT EXIST NOW 
Se O0e47e 000240 4$: NOP 
S63 002474 012737 171300 001120 DETERe: MOV ate) $GDADR ;LOAD BUS ADDRESS 
564 002502 O1e737 002654 007366 MOV RET om” LOAD RETURN ns AFTER TESTING 
565 002510 004737 003340 JSR Fc ET DETERMINE & OF MAPS 
565 002514 000453 BR 35° :BR IF CONTROLLER DOESN’T E¥IST 
| S67 G0eSi& 204737 003576 JSR PC, LODADR FIX THE BUS A 
568 O00252e 005737 001254 TS sche {TEST IF THE OPERATOR HAS SELECTED SOME MAPS 
S69 O0eSe6 001407 BEQ 6$ ;8R IF NOT 
570 002530 013737 001254 901252 MOV $COWe, SCDW1 LOAD _HIS SELECTION 
571 00eS36 052737 100000 001556 BIS #BITIS,MSAVE2  ;SET contROLLER EXISTS FLAG 
S7e 002544 000430 BR es ft D TEST THEM 
$73 002546 105737 001213 6$: TSTB SENVM TEST_IF “DO NOT SIZE” IS SET 
574 O0eSSe 100007 BPL S$ iBR F NOT 
002554 013737 001250 001252 MOV $DEVM, S$CDW1 VALUE SUPPLIED BY “APT” 
576 O0e562 052737 100000 001556 BIS #BITIS,MSAVE2  ;SET CONTROLLER EXISTS FLAG 
577 002570 000416 BR es 
678 O0eS7e 005737 001200 S$: TST $PASS ; TEST “ pens! PASS 
579 002576 001006 BNE 1$ sBR y 
580 002600 013737 001512 001556 MOV SAVE] MSAVE2 ;SAVE THE "WUMBER OF MAPS 
| 581 0026068 052737 100000 001556 BIS #BIT15, MSAVE2 ;SET “CONTROLLER EXIS~ 3" FLAG 
582 002614 123737 001512 001556 1S: CMPB SAVE! , MSAVEe ; COMP ARE IF ANY CHANGE IN # OF MAPS 
583 O0ebee 001401 BEQ es BR IF NOT 
584 O02624 104016 ERROR 16 PREVIOUSLY EXISTING err MAP DOES NOT EXIST NCW 
S85 O0ebe6 012737 OO0004 OO1S4E 2S: MOV #4, COAXSW ;LOAD SWITCH VALUE 
586 002634 005037 001102 CLR $I TSTNN ;RESET TEST # 
5@7 002640 000137 003762 JMP AND TEST THIS CONTROLLER 
S88 002644 005737 001556 3$: TST NEAVER : TEST 4 CONTROLLER EXISTED AT ONE TIME 
! 589 9002650 10000) BPL 4$ 
599 O0e65e 104017 ERROR 17 ; PREVIOUSLY EXISTING CONTROLLER AT 171300 DOES NOT EXIST NOW 
591 002654 000240 4$: NOP 
592 002656 012737 172300 001120 DETERS: MOV #172300, SGDADR ;LOAD BUS ADDRESS 
S33 002664 012737 093036 007366 MOV #4$, RETURN ;LOAD RETURN ADDR. AFTER TESTING 
534 002672 004737 003340 JSR PC, DETECT DETERMINE # OF MA 
595 002676 000453 BR 3$ :BR IF CONTROLLER DOESN’T EXIST 
£96 002700 004737 003576 JSR PC, LODADR :FIX THE BUS AD 
637 00e704 905737 001254 TST sche j TEST IF THE OPERATOR HAS SELECTED SOME MAPS 
598 09¢710 001407 BEQ 6$ ; R IF NOT 
$93 O0e71e 013737 001254 O01252 MOV $COW2, SCDW LOAD HIS SELECTION 
690 pee? 0Se737 100000 O015&0 BIS #BIT1S, NSAVES ; SET contROLLER EXISTS FLAG 
£0: 002726 000430 BR 2g ;AND TEST 
62e 002730 105737 001213 &$: TSTB SENVM TEST IF “DO NOT SIZE” IS SET 
602 002734 100007 BPL S$ ‘BR IF NOT 
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0 GRAPHIC TEST PROGRAM MACYL1 27(1006) O&-DEC-76 17:42 PAGE IS 
DETERMINE THE NUMBER OF CONTROLLERS TO TEST 
SDEVM, SCDWL USE VALUE § yPPLIED BY “RPT 
aB1715, MSAVE2  ;SET CONTROLLER EXISTS FLAG 
S$: $PASS :TEST IF FIRST Pass 
bh vey MSAVES : THE NUMBER OF M 
#81715, MSAVES SET “CONTROLLER Serers® FLAG 
18: Save! PSAVES : COMPARE iF ANY CHANGE IN # OF MAPS 
3 PREVIOUiY EXISTING BIT MAP DOES NOT EXIST NOW 
2s: 40 COAXSW “LOAD SWITCH VALUE 
STSTNM :RESET TEST 
TST] !QND TEST THIS CONTROLLER 
38: NSAVES :TEST IF CONTROLLER EXISTED AT ONE TIME 
- E 1? PREVIOUSLY EXISHING CONTROLLER AT 172300 DOES NOT EXIST Now 
DETERS: #173200, $GDADR ; LOAD BUS ADDRESS 
M 84S, RETURN :LOAD RETURN ADDR. AFTER TESTING 
PC, DETECT :DETERMINE & OF 
‘BR IF CONTROLLER DOESN’ T EXIST 
PC, LODADR :FIX THE BUS SSES 
sce TEST Tf ine OPERATOR HAS SELECTED SOME MAPS 
$CDW2, SCDW! LOAD HIS SELECTION 
ABITIS, MSAVEY SET contROL LER Exists FLAG 
6S: SENVM :TEST IF “DO NOT SIZE" IS SET 
5§$ :BR IF NOT 
SDEVM, SCDW! “USE VALUE SUPPLIED BY “APT™ 
agIT16, MSAVEY =; SET CONTROLLER” EXISTS FLAG 
cs: $PASS :TEST IF FIRST PASS 
1$ :BR IF NOT 
SAVE1, MSAVEY “SAVE THE NUMBER OF MAPS 
agit MSAVEY SET “CONTROLLER EXISTS™ FLAG 
1$: 1, MSAVES sCOMPARE IF AN Y CHANGE IN &# OF MAPS 
16 ; PREVIOUSLY EXISi ING BIT MAP DOES NOT EXIST NOW 
23: $25 COAXSW OAD SWITCH VALUE 
STSTNM :RESET TEST 
TST AND TEST THIS CONTROLLER 
3S: NoAvEs : TEST Tf CONTROLLER EXISTED AT ONE TIME 
1? SPREVIOUSLY EXISTING CONTROLLER AT 173200 DOES NOT EXIST NOW 
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| MRINDEC-11-D2VSE-8 VSVOL VIEDO SRAPHIC TEST PROGRAM MACY11 27(1006) O2-DEC-7E 
, DIVSER.PL1 © G2-IuN-7& 00:20 DETERMINE THE NUMBER OF CONTROLLERS TO TEST 
SO ocozz22 DETEC?: 
3: -SBTTL END OF PASS ROUTINE 
&S3 s SSESRELSLALARELLSLERALSLALSELSLAFAALELESREFFLFFSLSSLSLFLESFLES FES 
£54 : INCREMENT THE PASS NUMBER ($PASS) 
gos YPE “END PASS SXXXXX" (WHERE XXXXx IS A DECIMAL NUMBER) 
e5é ete THERES A HON NITOR GO TO IT 
55: IF THERE ISN'T JUMP TO RESTAT 
&55 003222 SEP: 
660 O03222 o00240 N 
$61 003224 005937 901102 CLR $TSTNM $+ ZERO THE TEST NUMBER 
662 00323¢ 905237 o01200 INC SPASS : INCREMENT THE PASS NUMBER 
£53 737 190090 oo1ece IC #190000, SPASS :;DQN'T ALLOW A NEG. NUMBER 
cc 2 EC (PC) + i ¢60p? 
£65 900951 SEOPCT: .WORD 
666 O03246 003022 BGT SDOAGN 2 :YES 
&&7 o03e50 Olev MOV (PC)+,a(PC)+ RESTORE COUNTER 
£58 009001 SENDCT: .WORD 1 
P53 pasee et 003223 aad $ENDMG TYPE “END PASS # 
67: O03062 013746 001290 MOV $Pass,-(SP) :1SAVE $PASS FOR FYPEOU 
&72 OO3266 104405 TYPDS -:G0 T YEE--DECINAL eect WITH SIGN 
573 003270 104401 903320 TYPE SENULL :: TYPE A NULL CHARACTER 
&74 903274 013700 9o0004e SGETH2: MOV de42,R0 >: GET MONT TOR SOORESS 
£75 903300 001405 BE $DOAGN +t H IF NO MONITOR 
&7& 002392 900005 RESET *: CLEAR THE WORLD 
£77 903304 904719 SENDAD: JSR PC, (RO) ::60 TO MONITOR 
&72 902306 290240 NOP ::SAVE ROOM 
£75 903310 o90240 NOP 33 
ee¢ o93312 oocl4o NOP *ACTLI 
68i 003314 SDOAGN: 
682 002314 9099137 JMP aiPC)+ : ;RETURN 
£83 903316 Odeto SRTNAD: .WORD RESTAT 
684 903320 377 377 O00 S§ENULL: .BYTE -1,-1,0 ;iNULL CHARACTER STRING 
PEE DOszes sie QUERLe QNELIE SENONG: .ASCIZ «15> «12> /END PASS #/ 
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cVSE-8 VSVOl VIEDO GRAPHIC TEST PROGRAM MACY]! 27(1008) Oe-DEC-7& 17:43 PAGE 17 
Oe@-JUN-"6 00:00 DETERMINE THE NUMBER OF BIT MAP’S ON A VTVO) 


‘ert DETERMINE THE NUMBER OF BIT MAP’S ON A VTVOL 
TTL 





013737 001120 001124 DETECT: Mov ScDADR $GDDAT ;GET BASE ROORESS 
Olev3a7 902670 o000c4 MOV ERRVEC ‘LOAD RETUR 
O0S777 «175544 TST sSetpaT “TEST THE CHAR ACTER STATUS ADDRESS 
0250327 901504 cLR TEMP2 ; THE CONTROLLER EXISTS NOW TEST THE Maes 
005037 001506 LR TEMPS 
Diers? 003434 900004 MOV 82S, ERRVEC ‘LOAD 8US TRAP RETURN 
013737 001124 901126 NOY -SGODAT SS0DAT ;GET THE ADDRESS _ 
737 000020 OClI26 18: ADD 820, SBODAT :UPDATE THE ADDRESS 
175510 TST  gSBODAT } OR AM pee 
37 O01504 INC TEMP2 YES_IT EXISTS UPDATE THE COUNT 
f22737 009006 0:50 CMP 86, TEMP2 :TEST FO LAST 
00:40e BEG 3 
000764 BR 1§ 
022626 23: CMP (SP)+, ( :POP THE STACK 
O1e737 000006 cooco4 3$: MOV sERVECse, ERRVEC :RESET BUS TRAP 
905937 900005 CLR ERR . 
995737 90042 TST pi : TEST If wnGiAIN MODE 
051020 SNE at :BR IF CHAIN MODE 
005737 00120 TST SPASS :TEST IF FIRST PASS 
903015 BNE 4§ :BR IF NOT 
104401 922750 TYPE VTHDRI !REPORT # OF MAPS 
013746 OO1124 MOV $GDDAT, - (SP? ON THE CONTROLLER ADDRESS 
104402 TYPOC 
104401 022774 TYPE VTHDR2 ; “HAS” 
013745 OO1504 MOV TEMP2, -( SP) ‘aN 
104403 TYPOS 
001 090 BYTE 1,9 sONE DIGIT 
104401 922902 TYPE YTHDR3 :"MGPS INSTALLED™ 
013737 OOISOS ocisi2 4S: MOV TEMP2, SAVE! iSAVE # OF MAPS 
051413 SEQ &$ F NONE 
O12727 oc00001 oolsos MOV 81, TEMP ‘Ton D INDICATOR 
005337 001504 cs: DEC TEMPS :CONVERT FOR LATER 
001405 BE 6$ 
096337 001506 ASL TEMPS MOVE 
905237 601506 INC TEMP2 
909770 BR S$ 
013737 OO1SO& o01252 ES: MOV Tena $CDWI sLOAD THE DETECTED MAP BIT'S 
o6271— o00002 ADD 2,8 SP) i UPORTE EXIT ADDRESS 
900257 RTS RETU 
D22626 7S: CMP (SP +, (SP)4 
500246 oP 


N 
00207 RTS PC 





| MAINDEC-11-D2VSE-A VSVOL VIEDC GRAPHIC TEST PROGRAM MACYL1 27(1006) O2-DEC-7E 17:42 SAGE 16 
| D2VSEA.P11 O2-JUuN-76 00:00 - 
«FBS OO8S TE 912700 p01446 LODADR: MOV BVCCSR,RO sLORD ADORESS POINTER 
73? 002602 013701 001120 MOV $GDADR:R1 ‘LOAD ADDRESS VALUE 
738 «4003608 010120 10$: MOV Rl, CROSS. :LOAS THE ADIRESSES 
739 003610 22700 001470 CMP #VeINT,RO :TEST FOR END 
740 6903614 901374 ONE 10$ 
741 003616 OSe737 000002 001450 aDD #2, VCHRLO sADIUST THE ADDRESSES 
742 | 062737 900003 901452 ADD #3. VCHRHI 
743 003632 062737 901454 ADD #4, VCPOS 
744 903640 O6e737 0000S 00145 ADD S'VCPOSH 
aS O62737 000020 O01460 ADD #20, VGCSR 
74 003654 062737 000022 001462 D 822, VGPC 
747 737 DO1464 Bop + VOB 
748 7 OO 146E AD. #20, VGCOLR 
745 003676 013737 oo 1242 o01479 HOY SveCTLAVCINT 31080 BASIC IN3. VECTOR 
rd ‘ ‘ 7’ * % VC H T LEV | 
oe Best Bis737 881490 Bola? MOV teint VCINT! 
7E2 003720 062737 O00002 001472 ADD 82, VC CNT 
733 003726 o00207 RTS pc’ sEXIT 
755 002730 082737 900020 OD:46D MCVADR: ADD #20, VGCSR :UPDATE BUS ADDRESSES TO NEXT MAP 
756 003736 O&2737 900920 fdl4ee ADD 820; VGPC 
fee pores Seera? Soonss Berue Abb (ESOT VGCOLR 
/ <7 37 fcU, 
358 053765 SB5o85 agg Be EXIT 
7é1 EST 1 VERIFY PLL BUS ROORESSES OF THE CHARACTER GEN 
ree STEST } VERIFY ALL BUS ADDRESSES OF THE CHARACTER GEN. 
Fi  SERECERREGEEESETORUGECERSSEEOTEUSTEESTOSSOEEESAERSORELOREESEEEE 
see OOSVE Drerar tt mY AQ CHARACTER SENERATOR ERR 
v4 = o Be é "a C GEN ATOR LOGIC | 4 8) 
Sep Beash3 Breses Aeceee Betts may aif EP ee CORD ERROR RETURN vs 
767 004000 013737 901120 001124 MOV ADR. $GDDAT AD BASE 
768 OO400E 062737 O0000E O01154 ADD * at rant ADIUST 76 pOF ADDRESS 
769 904914 013727 O01120 OCi126 MOV SGDADR, SBDDAT ;LOAD TEST ADDRESS 
770 004022 912737 904054 of0004 MOV 82$, JaERRVEC :LOAD BUS TRAP RETURN 
77; 004930 005777 i7s07e 1S: TST aSBODAT :TEST IF ADDRESS EXISTS 
772 004034 023737 001124 001126 CMP SGDDAT , $BDDAT “TEST IF FINISHED ALL ADDR. 
773 «004042 991497 BES 3¢ :;BR IF ALL DONE 
774 904944 062737 ocDDDDe o01:26 ADD 82, SBDDAT sADJUST ADDRESS POINTER 
ee 000766 BR 1g : TRY AGAIN 
777 O04054 oers2E 23: CMP (SP)+, (SP)+ sCLEAN STACK 
778 O94056 19400! ERROR 1} ?BUS ERROR WITH CHARACTER ADDRESS 
re N94080 o00763 BR 1$ 
728i OOS0E2 012727 D0DODE ooDDDy 3s: MOV SERRVEC+2, DHERRVEC :RESET BUS TRAP 


782 004070 005037 OSO0006 cLR DHERRVECSE 
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MACY11 27( 1006) 


Ce-DEC-7E 
TEST ALL EXISTANT BUS ADDRESSES FOR THE SELECTED 
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17:43 PAGE 1S 


BIT MAPS 


:@TEST 2 TEST ALL EXISTANT BUS ADDRESSES FOR THE SELECTED S17 “ars 
gage 2 gp cup ma pepegmomncayg 98 one Oo taints regs 
MOV 81%, SLPERP ;LOAD RETURN IF ERROR 
MOV GoPOR, TEMP: :GET BASE ADDRESS 
ADD 820 TERPL ;UPDATE TO THE MAP ADDRESS 
MOV $COW1.D ;GET THE SELECTED i 
BIC SCOR be SerMe :MASK TO LOWER SIX SITS 
BEG 3$ :BR IF NO MAPS SELECTED 
CLR SUNIT : CLEAR NAP INDICATOR 
MOV #8110, TEMPS :LOAD TESTING BIT 
18: BIT TEMP3; DEVTMP :TEST IF THIS BIT MAP IS SELECTED 
BEG 2 :BR IF NOT 
IMP 10$ SELECTED - TEST THIS MAP_ 
2s: D 120 TEMP! [UPDATE TO NEXT BUS ADDRESS 
INC SUNT ; UPORTE MAP INDICATOR 
ASL TEMP3 :MOVE THE TEST BIT 
CMP 8100, TEMP3 TEST Tf IF ANY MORE POSSISLE mars 
ah BNE 1§ MORE 
BS TST3 :;BR TO NEXT TEST 
: THE BIT MAP ADDRESS IS IN TEMP - LOAD THE ADDRESS AND 
: START TESTING THAT BIT M 
10$: MOV #20$, 284 sLOAD FOR BUS TRAP 
MOV rene] $BDDAT LOAD ADDRESS POINTEP 
TST aSBDDAT ‘SET AN ADDRESS 
ADD #2, SBDDAT :UPDAT ss 
TST aSBDDAT :TEST AN ADDRESS 
ADD #2, SBDDAT ‘UPDATE ADDRESS 
TST aSBDDAT : TEST AN ADDRESS 
ADD $2, SBDDAT [UPDATE ADDRESS 
TST JSBDDAT :TEST AN ADDRESS 
ADD #2, SBDDAT : UPDAT $s 
TST JSBODAT :TEST AN ADDRESS 
ADD #2, SBDDAT :UPDATE ADDRESS 
TST aSBDDAT : TEST AN ADDRESS 
ADD 82 :UPDATE ADDRESS 
TST a$BDDAT - TEST AN ADDRESS 
ADD #2, SBDDAT ;UPDATE ADDRESS 
TST 2SBDDAT EST AN ADDRESS 
ADD #2, SBDDAT sUPORTE ADDRESS 
BR 2g : RETURN 
208:  § cMP (SP i+, (SP)+ ; POP STACK 
ERROR 2 ?REPORT SUS ERROR TRAP ON A SELECTED BIT NAP 
& 2s : RETURN 


DEVTMP: ADEVM 


:BITS SET INDICATE THE MAPS TO SE TESTED 
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MSINDEC-11-D2VSE-8 VSVOL \IEDC GRAPHIC TEST PROGRAM 1 27(1006; 0e 
DIVSEA.F LI O2-JUN-7—E 20:00 T3 TEST THE CHAR CURSOR + ATEAGLE 817 

83é ‘ = SRLERFESEFERAELESSRERHALELAERESLALA SE RESALE RAF RELFLFFFRSFFLSFRFF +E 
837 LSTEST 3 TEST THE CHAR CURSOR DISABLE BIT 
838 "hs jtet-+-+->-+ mata inka ahaha ia natalia 
$23 QO436E 900004 nnn tét2: OPE 
840 004364 Ole?3? if7?7? 001204 MOV #-1, SUNIT INDICATE A CONTROLLER ERROR 
841 0904372 012737 oO02990 991124 MOV 887110, SGDDAT LOAD EXPECTED VALUE 
B42 DO4400 Ola777 O90 175040 MOV $GDDAT. JVCCSR :LOAD THE REGISTER 
S45 0 17737 175034 001126 MOV ave BODAT : THE REGISTER 
B44 904414 042737 140000 O01l26 BIC #140000, $8DDAT sMASK TO iis 15-14 
G45 904422 023737 01124 901126 CMP SGDDAT, $BDDAT jon ARE 
G46 904430 001401 SEQ =sTST4 ;:8R IF EXPEC 
. 004432 104003 ERROR 3 AR CURSOR DISABLE’ FAILED To SET 
84s 5 LRLEAEALAFERELEAERELELAE ESSE LALRELAKESLELERSRERELLLFSRELEFEAERF* 
esc i TEST 4 TEST THE Y CROSS HAIR ENABLE BIT 
85) i s SSERAEFRERESFERERERLLARASSARSASAL FASE SLELSSLELEERAERLERELFELLFLGS 
852 904434 00004 ‘ety: SCOPE 
Ses coe Bm Gu ae ae ee 
veo wf é i 
855 O044S2 917737 recta 01126 MOV VCCSR’ SBDDAT tREAD T T RecisiER 
856 OO44E0 042737 140000 001126 BIC #140000, $BDDAT ;MASK TO BITS 15-14 

* DONE 023737 OOlio4 OO1126 CMP $GDDAT, $BDDAT i COMPARE FOR SAME 
B58 004474 901401 BEQ ss TSTS ;;BR IF or 
g3 004476 194003 ERROR 3 y CROSS HAIR ENABLE’ FAILED To SET 
86} ea iar haa & toe te ee 
B62 : $TEST S TEST THE X CROSS HAIR ENABLE BIT 
8&3 + LELEREREEEREREAASERERAREAE SEA EEAELARSESESESRRELER ESSE SHAE SEES 
864 04500 c00004 téts: SCOPE 
BES 904502 012737 010000 001124 MOV #81T12, SGDDAT ;LOAD EXPECTED VALUE 
866 OO4S10 013777 001124 174730 MOV $GDDAT; aVCCSR sLOAD THE REGISTER 
867 OO4516 917737 174724 001125 MOV aVCCSR, SBODAT :READ THE REGISTER 
858 004Se4 042737 140000 001126 BIC #149000. $BDDAT :MASK TO gris 15-14 
265 904532 023727 boris 001126 CMP $GDDAT, $BDDAT “COMPARE FOR SAME 
870 D04540 902401 BE TST6 :;BR IF Expected 
£72 co4s42 104093 ERROR 3 X CROSS HAIR ENABLE* FSILED TO SET 
273 = SELRERESKREFR SLE LAAFELSELHRASSEFAALELARERSRALALARALEARERFSASSRARSEAS 
274 tht EST & TEST THE VERT SYNC INTR. ENABLE BIT 

‘Ss S RERLLEKLSEESLELAA SLE RAALLLHAEERELRAALE LAE RSAALLALAERAFRELRERFAALTAE 
E76 oc04s44 009004 tite: SCOPE 
877 OO¥S4E Ole746 000340 MOV #340,-(SP) ;RAISE PRIORITY 
878 O045S2 012746 O04560 MOV 81$,-(SP) 
@79 o04sS6 000002 RTI 

004569 012737 O20000 001124 1S: MOV #B1T13, $GDDAT ;LOAD EXPECTED VALUE 
881 OO4SEE 013777 001124 174652 MOV SGDDAT; IVCCSR :LOAD THE REGISTER 
£82 004574 017737 174646 001126 MOV aVCCSR, SBODAT READ THE REGISTER 
B23 O04602 042737 140000 001126 BIC #140900. $BDDAT :MASK TO iis 15-14 
884 904610 923737 001124 001126 CMP SGODAT, $B8DDAT :COMPARE FOR SAME 
bee Ooeee6 | 1ON0G8 FRROR «et CERT Me INTR. ENASLE* FAILED TC SET 
ILED TC SET 

ge? Oo462e2 042777 C2000 I7461E 23: BIC #BIT13, dVCCSR DISABLE IN 


we ee ae eee ne 


| eae ati “O2V'SE-« VSVOi VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006) O2-DEC- 7:43 PAGE 2: 


VSER.P C-Jun-7— 90:56 T? TEST THAT “RESET” ELEARE CHARACTER cratus” nee. 

ess 5 FERERAEAERRERAERAESRARALER ASA RA LARAFEEFRAEARE SALSA SSER AAS ERE LFS 

230  STEST ? TEST THAT “RESET” CLEARS CHARACTER STATUS REG. 

8s! + SERSRHSSESSSSSLSSSAASSESSELALFSLASESRALHRARAEAELELLLFASLRELFEL ESF 
o04630 900004 45>, SCOPE 

&S> O94632 905037 901124 , CLR $GDDAT :CLEAR EXPETED 

884 904636 O12°77 93699 174602 MOV #BITIZIBITL2!BITLIIBITIC,aVCCSR :LOAD THE REGISTER 

83s 04644 pog00s RESET ‘CLEAR THE WOR 

5 agus 017737 174s? 901126 MOV JVCCSR, $BDDAT :RE D CHARACTER STATUS 

gs? nowesy 042737 fas? D112 BIC #141777, $BDDAT ASK TO OTHER BITS 

ese OO4eb2 S014 BEO TST1O 3B FAL BITS CLEARED 

g95 904664 104003 ERROR 3 RESET FAILED TO CLEAR CHARACTER STATUS REGISTER 

32¢ —ssarsastt OB caadsseannnunrzansescesuevelRise fAILED TO CLEAR, ch 

$0)  STEST 10 TEST THAT "CLEAR LOW BYTE’ DOES NOT CLEAR HIGH BYTE 

302 ee eRe a ce ee ea 

$03 OO4666 000004 tir) COPE 

904 004670 012737 016000 001124 MOV #16000, SGDDAT :LOAD EXPECTED READ/WRITE RESUL 

905 O0467& 013777 901124 174542 MOV $GDDAT, aVCCSR :LOAD THE REGISTER BITS 

305 904704 105077 174536 k CLRB avccsR’ ‘CLEAR LOW BYTE 

$07 004710 Oi7737 174532 o011e6 MOV JVCCSR, SBDDAT READ THE RESULT OF ‘CLRS* 

908 OO4716 D4z737 140000 001126 BIC #SITIS'BITIY, SBDDAT :MASK TO TOP TWO BITS 

$08 904724 923737 OC1I24 O01126 CMP $GODAT, SBDDat “COMPARE FOR SAME 

$10 So4732 601401 BE TSTl! ::BR IF EXPECT TED 

$i: 004734 [d4003 ERROR 3 sCLR LOW BYTE CHANGED THE 


£ :HIGH BYTE OF THE CHAR STATUS RES. 


Ww) 
OwD- IMUM £ ty , 
. , 
ore 


TU b= 0+ «b+ ps oe 


Ver ary ory every Rvs Tvs) 


BSRBcCBo 
IO O+-Or 


S4o2 VIED Shi TEST 


O015i6 
OOli2é 


001514 


PROGRAM 
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MACY11 27( 1006) 
TEST THAT “VERT SYNC* FLAG CHANGES STATES 


-5-5-5-Sahelalabaalabael-1-5-+-eb-ty-t la het iab-tt vk al-tab-ttab-t-ht-t--tah--t-lllallll 
ATEST 11 EST THAT ‘VERT SYNC’ FLAG CHANGES STATES 
- LEEREEAEEEEEREREREREREELELESER LEER EE RESELLERS EL ERR EE AE RAE REESE SE 


sENSURE CLEAR REGISTER 


avccsR 


ISR FC, COUNTA 
jou TEST tHE RELATIVE 7 


aa : bos 


cave? $BDDAT 
SBDDAT 
SBODAT 


$8DDAT 
SBDDAT, SAVED 
SAVED, SBDDAT 
$BDDAT 
separ 


BODAT 
$BDDAT , SAVEE 





Oe-DEC-76 17:43 


FOR 


0 WAIT 
E DIFFERENCE BETWEEN ‘OFF’ ane 
:SAVE THE FIRST TIME 


;SAVE THE SECOND TIME 
;LOAD ne IGGER TIME 
ae THE FIRST TIME 


SAME 

O TIME DIFFERENCE BETWEEN 
‘NDA BI ME 

;DIVIDE BY 8 


GGER TIM 


-TEST THAT MAGITUDE 0 
::8R IF GREATE 
:LOAD FIRST VALUE 


;ADJUST VALUE 


+ eg TO SECOND READ 
BR IF MAGITUDE IS GR 
:TIME DIFFERENCE Behieen OFF AND ON STATE WRONG 





m 


BETWEEN THE Ti 
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MAINDEC-11-D2VSE-A vSvO!1 VIEDC SRAPHIC TEST PROGRAM MACY11 27(1008) O2-DEC-76 17:43 PAGE 22 
D2VSER.P11  O&-JuN-7E 00:00 TEST THE "CHAR READY’ FLAG USING THE “HOME” CODE 
342 5 SERERSLAER REL ALAA RAAA EA RA LALA AERA LL EL AES SEARLE LLASLE LEASE E LFS 
343  STEST le TEST THE ‘CHAR READY’ FLAG USING THE “HOME” CODE 
Soe ‘ * SRAEKSRSEESAERASASRASE ESSERE ASRE LASSE RELA RAAEEAALALAS RA LAE RLF ELE 
45 oosi00 900004 téT12: SCOPE 
& 005102 OOS077 174340 CLR aVCCSR sCLEAR THE CHAR REG 
47 005106 O12737 100909 901124 MOV #81715, SGDDAT LOAD EXPE CTED READ VALUE 
$48 905114 O17737 174326 00112¢ MOV aVCCSR, SBDDAT ;REA O THE STATUS REGISTER 
949 905152 10040: BMI 1$ ::BR IF ! CHAR READY’ IS SET 
$50 905124 104003 ERROR 3 ; "CHAR READY’ FAILED TO SET 
$51 BY LOADING A ’0" CHARACTER 
Se NOH TEST THAT LOADING A “HOME” CHARACTER WILL CAUSE 
353 : READY” TO CLEAR AND THEN SET AFTER A DELAY 
954 oocies 095037 001124 CLR scD08T CLEAR EXPECTED READ VALVE 
S55 905132 lle777 900035 174306 MOVE #35, JVCCSR ‘(OAD A “HOME™ CHARACTER 
956 005140 017737 174302 001126 MOV SeCeSR. $BDDAT READ THE REGISTER 
957 OOf146 10090) BPL 2$ :;BR IF 'CHAR READY’ CLEARED 
98 905150 104003 ERROR 3 ;*CHAR READY’ FAILED TO CLEAR WHEN LOADED 
Ses i : ‘WITH A “HOME” ASCII CHARACTER 
860 o0S1S2 012737 190000 ocOolle4 28: MOV #BIT1S, SGDDAT 
961 OO5160 912709 iooo00 MOV #8IT1S,RO -LOAD A DELAY FACTOR 
S62 OOSIE4 017737 174256 OOL112E 3S: MOV JVCCSR. SBDDAT READ THE REGISTER 
93 005172 100403 BMI TST13 :;BR IF THE BIT FINALLY SET 
964 005174 905309 DEC RO : DELAY 
965 995176 O01372 BNE 3$ :BR IF NOT DONE 
966 505209 104505 ERROR 3 5 CHAR READY’ FAILED TO SET AFTER LOADING 
367 :@ “ORINTABLE™ CHARACTER. 


oer ne nn ener ne nee nee se er re = en ee +e, 
’ 


194005 


VSVOl 
00:80 


000340 
005216 


174156 


005232 
000100 


005320 


174116 
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O2-DEC-76 
TEST FOR “VERT SYNC’ INTERRUPT 


5 FRRERRERRASSESESES ERE LERERERLLE REAL ELE LER EL ERELER ESSER SES ERE LED 
;RTEST 13 TEST FOR ‘VERT SYNC’ INTERRUPT 


ee ee eer ae 
MOV #340, -(SP) sLOAD PSW RETURN TO LEVEL 7 
MOV #10$,-(SP) ‘LOAD RET 
RTI :D0 THIS TO BE LSI-11 COMPAT. 
103 MOV #81713, 3VCCSR :SET INTR ENA 
JSR PC, COUNTA WAIT FOR A COMPLETE’ VERT SYNC’ CYCLE 
MOV #o$ SUCINT con INTR RETURN VECTOR 
MOV #340, QVCINT! 
MOV #10,R0 ‘LOAD A SHORT DELAY COUNTER 
CLR -<SP) "LOAD PSW RETURN TO LEVEL C 
HOV #13,-(SP) :LOAD RETURN P.C. 
1$: DEC RO :DELA 
SNE 1$ :BR tr NOT DONE 
CLR aVCCSR 
ERROR 5 "VERT SYNC’ FAILED TO CAUSE AN INTR. 
R TST1 : oves INTR HANDLER 
- RETURN HERE Sart PSW=7, pBReRY PRIORITY AGAIN AND TEST FOR NO INTERRUPT AGAIN 
2s: bmp (SP)+, (SP)+ sADJUST THE STACK BY 4 
MOV #4 aycINT! RELOAD INTR VECTOR TO FALSE INTR HANDLER 
MOV #10 100, "LOAD DELAY COUNTER 
CLR CSP} ; LOAD PSW RETURN LEVEL T0 0 
HOV #33, -(SP) ‘LOAD RETURN P.C. 
33: DEC RO pape 
BNE 3$ 
CLR JVCCSR ;CLEAR INTR ENABLE 
BR TST14 $3 
4$: CMP (5P}+, (SP)+ sADJUST STACK 
ERROR 5 ?INTR DONE FAIL™D TO CLEAR INTR REQUEST 





=e 
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MAINDEC-11-D2VSE-A vSV01 VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006) O2-DEC-76 17:43 PAGE 25 
DZVSEA.P11  O2-JUN-7& 00:00 T14 INTERRUPT LEVEL TEST FOR ‘VERT SYNC’ INTERRUPT 
19092 j EHAARARELEARASSAALA EE ARELLLA LEA EREAA LER ELELARERELELELFRRELRELELER 
| 1003 ; tSTEST 14 INTERRUPT LEVEL TEST FOR ‘VERT SYNC’ INTERRUPT 
| 1004 © = RELRERELERSERERAASRE RES SHELA SERA LE RHA RARE REAELELALALALAELEKASE 
| 1005 905336 oo0004 tST14: SCOPE 
1006 005340 012746 900340 MOV #340,-(SP) ;LOAD PSW RETURN TO LEVEL 7 
i 3097 o05344 Ole746 005352 MOV 810$;-(SP) ‘LOAD RETU 
1008 ooogoo2 RTI :D0 THIS "8 MBE LSI-11 COMPAT. 
1908 005252 012777 oe20000 174066 108: MOV #B1T13, aVCCSR :SET INTR EN ABLE 
1010 805360 004737 015672 JSR PC. COUNTA ‘WAIT FOR A COMPLETE ’VERT SYNC’ CYCLE 
1011 005364 012777 OOS444 174076 MOV #2$. JVCINT ; LOAD INTR RETURN VECTOR 
1012 008372 O1er77 900346 174072 nov #340 gvCINTI ss nan : onet ante beeen 
3/8) 
| dete BRedRS 948299 BROCE co icie Move SveeT +1. SAVER IGET BR LEVEL 
1015 o005412 042737 177437 OO151& BIC #177437 SAVES ; MASK QUT Bis 
1018 poet 1 74 5 MOV -t * LOAD VE! 
10! 4 127’ 4 MOV cis ES Sp} ?LOAD RETURN P.C. 
1018 005430 oooo02 . RTL % 
1 4 rat habeas Bre ig BR oP IF NOT DONE 
1021 005436 005077 174004 CLR SWCCSR 
1022 oos442e 900404 BR OVER INTR HANDLER 
1923 “RETURN HERE IF aN INTERRUPT occdReeD %* ERROR * 
' §67054 «pos4H44 ge2525 2s: CMP (SP)+, (SP)+ s ADJUST THE STACK BY 4 
| 1025 OOS446 005077 173774 CLR avecsR 
. 1026 oos4s2 104005 ERROR 5S : VERT SYNC INTERRUPTED IN ERROR 
| 1027 715 BR LEVEL CORRECT 
| 1928 OOS4S4Y 012777 o0S512 174006 SS: MOV 843 avCINT ; RELOAD INTR VECTOR 
1029 O05462 012700 o00100 MOV #10 100, R ‘LOAD DELAY COUNTER 
' 3030 OOS466 O05 CLR -( ?LOAD PSW RETURN LEVEL TO 0 
, 1031 005470 012746 005476 MOV #3$, rae ‘LOAD RETURN P.C. 
| 1032 005474 od00002 RTI 
| 1033 005476 005300 3S: DEC RO : DELAY 
1034 o05500 001376 BNE 3$ 
' 1935 goo5502 005077 173740 CLR aVCCSR :CLEAR INTR ENABLE 
' $036 O05 104005 ERROR 5S ‘LOWERING PROIORITY FAILED TO CAUSE AN INTERRUPT 
| 1937 905510 o00401 BR 6$ 3 
| 1038 805512 O22626 4: CMP (SP)+, (SP)+ ;ADJUST STACK 
| 3039 095514 oo5046 6$: CLR “(5 
| =. 1040 pose 16 C1274 o0ss24 MOV #7$,-(SP) 





19) 0000 
| 1082 O06&4 oog24o 7$: NOP 





MM INDEC-11-D2VSE-A 
DZVSEA.P11 02-JUN-7E 


1046 005526 d00004 
005737 


1 
1083 005724 005077 
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ySV01 VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006) O2-DEC-76 17:43 PAGE 26 
00:C0 TIS DYNAMIC TESTING OF THE X CROSS HAIR POSITION REGISTERS 
5 SRAERAE AAA RARE A ALARA RAL S AKA RA RA KARA KALLE LELELALALAL ALAA LL ELELEE 
 iTesT 15 DYNAMIC TESTING OF THE X CROSS HAIR POSITION REGISTERS 
se Ce ae ee ee 
001544 TST B ;TEST IF RUNNING IN “BURN-IN" MCOE 
BEG 3$ NOT 
o01s46 174004 MOV  COAXSW, ICOAX :LOAD THE RELAY 
O16666 ISR RS, DELAY ‘LET THE RELAY ‘SETTLE 
2s: 
001200 TST $PASS - TEST IF FIRST PASS OF PROGRAM 
BEQ TSTI6 :;BR IF FIR RST 
oo2000 173352 BIT #SW10,aSWR TEST iF INHIBIT VISUAL CHAR. PATTERNS 
BNE ;;BR IF iNHIBIT Is SET 
10000 173650 2%: MOV #BIT12, aVCCSR sENABLE X CROSS HAIRS 
01124 CLR $GDDAT ‘CLEAR EXPECTED VALUE 
173642 CLR JVCHRLO :CLEAR POS. 
001124 173634 1S: MOVB § $GDDAT, dVCHRLO !LOAD THE LOW BYTE (X POSITION) 
016666 JSR RS, DELAY 
001124 INC $GDDAT ;UPDATE X POSITION 
091124 001536 CNP $GDDAT, XHAIR :TEST IF MORE LINES? 
= LERELKSRKE RAE ERASE LALA LAKE LESH A RRA R AERA A KALLA RESALE LAAAEEEEEE 
i eTEST 16 DYNAMIC TESTING OF THE Y CROSS HAIR POSITION REGISTERS 
; Rr ed 
001200 -TEST IF FIRST PASS OF PROGRAM 
BEG Ts? ::BR IF FIR I Pass 
002000 173264 #5W10, ISWR EST IF INHIBIT VISUAL CHAR. PATTERNS 
BNE TST17 :;BR IF iyatarT IS SET 
4000 173562 MOV #81111, 3VCCSR :CNABLE Y CROSS HAIRS 
001124 CLR $GDDA 
173554 CLR JVCHRLO aime POSITION 
001124 173550 1S: MOVB § $GDDAT, aVCHRHI 
O16666 ISR RS, DELAY 
001124 INCB  $GDDAT 
O0iS4O 001124 CHEE YHAIR, SGDDAT 
173516 aVCCSR sDISABLE CROSS HAIRS 
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013701 
004737 


004737 


004537 
000144 
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VSVO! VIEDO GRAPHIC TEST PROGRAM . MACY11 27(1006) O2-DEC-76 17:43 PAGE 27 
& 00:C0 T1?7 FULL SCREEN OF A CHARACTER 
33 = SKSKKKKERE RE KRKE ERE EE KE RAKE KERR KKRER ELAR AAA RAE LA KA AAA REL ALALALAEE 
:#TEST 17 FULL SCREEN OF A CHARACTER 
ne ee a ane ee ee 
001200 TST SPASS -TEST IF FIRST PASS OF PROGRAM 
BEQ TST20 :;BR IF FIRST FA PASS 
002000 172172 BIT #510, ISWR TEST IF INHIBIT VISUAL CHAR. PATTERNS 
BNE TST20° :;BR IF inaTart IS SET 
017256 JSR PC, HOME ;HOME AND ERASE THE SCREEN 
016076 JSR PC} FILLWC ‘FILL SCREEN WITH A *E’S 
016666 JSR RS; DELAY 
100. 
MTT iitiibictituberidtintetiiae 
20 SINGLE CHARACTER ACROSS ALL COLS. <ALL CHARACTERS? 
TeaLeSdeannssalovesesitiasssessnetzaassnssinstnsoaessree 
001200 > Tar $PASS TEST Ie FIRST PASS OF PROGRAM 
BEQ TST21 :;BR IF tt 
po2000 173134 BIT #SW10,dSWR: TEST IF PNHIBIT VISUAL CHAR. PATTERNS 
BNE TST21 ::BR IF invtert IS SET 
017256 JSR PC, HOME OME AND ERASE THE SCREEN 
009040 001530 38: MOV #40, STCHAR SET-UP STARTING CHARACTER 
o01S2e4 001534 MOV VHO, TEMPO sLOAD COUNT 
001530 1S: MOV STCHAR, R1 LOAD Rl= TO CHARACTER 
016132 JSR PC, FILBUF ‘LOAD’ A BUFFER WITH THAT CHARACTER 
016032 ISR PC, XPRNT sDISPLAY A FULL LINE FROM THE BUFFER 
001534 DEC TEMPO sDONE ? 
BPL 23 FINISHED 
Olb665 ISR RS, DELAY 
017256 JSR PC, HOME ;HOME AND ERASE THE SCREEN 
001524 001534 MOV VHO, TEMPO 
001530 2s: INC STCHAR ;UPDATE THE CHARACTER 
001532 001530 CMP LASTCH, STCHAR :TEST FOR FINAL CHARACTER 
BNE i$ ‘BRANCH IF NOT COMPLETED 
D1G6E6 ISR RS, DELAY 
100. 


eee +e oe 


Pe ed ed ed ed ee ed ed ee ee ee 


BR RRR Bitten 


YS RGRE isn 


Be 


* 0-2 Db ~0 §« & 0 9. + h-= &< Ba he 2 6-2 + 8h Od Bh * 4 Bo Bh Be hOB 
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EDC GRAPHIC TEST PROGRAM ACYI1 27(1006) O2-DEC-76 17:43 PAGE 2g 
T21 ROTATING cHARRC TERS ACROSS ALL COLS. ‘ALL CHARACTERS) 
s SFELSLASELSAFSSERFRAELLELELELSLAFESEFSSFLSSLESSLESSLFSSLESLE LES 
ISTEST 21 ROTATING CHARACTERS ACROSS ALL COLS. <ALL CHARACTERS: 

OT eat 2" enemies semarea: aera tmaase aan elena ras 
TST $PASS -TEST IF FIRST PASS OF PROGRAM 
BEG S722 ::BR IF FIRST PAS 
BIT sSW10, aSWR TEST IF INHIBIT VISUAL CHAR. PATTERNS 
SNE TST22 -:BR IF tNHIBIT IS SET 
ISR PC HOME “HOME AND ERASE THE SCREEN 

38: MOV #40, STCHAR :SET-UP STARTING CHARACTER 
ISR : HOME AND ERASE THE SCREEN 
MOV wer Tereo 

18: MOV STCHAR,R : LOAD RizTO CHARACTER 
ISR RS.LIC’ CORD A BUFFER STARTING WITH 
WIDTH - THAT CHARACTER AND WIDTH <BYTE> 
ISR PC, XPRNT :DISPLAY A FULL LINE FROM THE BUFFER 
DEC TEMPO :DONE ? 
BPL 2 :BR IF YES 
SF RS, DELAY 
JSR PC, HOME :HOME AND ERASE THE SCREEN 
MOV VHO, TEMPO 

2s: INC STCHAR ; YPORTE THE STARTING CHARACTER 
CMP tasTCH, STCHAR :TEST FOR FINAL CHARACTER 
BNE 1g BRANCH IF NOT COMPLETEC 


JSR RS, CELAY 


ee 2 ee eee 





AFL) O2-JUN-"6 00:CC Tee DIRECT CURSOR ADDRESS TEST 


an 


vt) 


2-8 <b + -< 0-+9-+ 


2} «9-6-6 p- 


re Stbbe atria totus 


w 


ESB SRA PIGS BB SRI PO hed otal dando 


PBR 


fin 


2 820s 8 4 08 bs 0 8 oe De ho = be Bt be he hs 8 os hs ho hs bh be Oe he he 8 he Oh ah + Bs 8 he hh « BBs 0 hw Bs Be 
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c-1i-DIVSE-8 VSVOl VIEDO GRAPHIC TEST PROGRAM MACY11_27(1008) O2@-DEC-7€ PAGE 29 


€ 


iver aa” DIRECT GRE eSe Iker 


#TEST 22 DIRECT CURSOR ADDRESS TEST 
FEEEPEREESSSERRLRERLEEEE EEE SSSSRESESRERERLLE SEER SEES ESESERSE SSS 


pose44 oo0004 janes SCOPE 
00ss46 005737 201200 TST SPASS -TEST IF FIRST PASS OF PROGRAM 
096252 001530 REQ TS723 ::BR IF FIRST PA Pass 
906254 O32777 OO02000 17265 BIT sSW10, aSWR IF INHIBIT VISUAL CHAR. PATTERNS 
006262 001124 NE T5723 :;BR IF infer? 1S SET 
006264 O04737 017256 JSR PC, HOME “HOME AND ERASE THE SCREEN 
006270 012737 123456 017704 ODCATST: MOV #123456,$LONUM ;PRIME RANDOM NUMBER GENERATOR 
5ose7— 12737 176543 017702 MOV #176543° SHINUM 
906304 013737 001520 O17152 MOV TOTALC, OVRAL = ;LOAD CHAR COUNT 
006312 613737 001524 o17150 MOV VHO -LOAD LINE COUNT 
© O12700 924350 MOV aBUFFER*ZO, RO LOAD DESTINATION BUFFER 
Ole701 17:54 28: MOV sMSGTXT ; LOAD MESSAGE POINTER 
006330 012120 is: MOV (R1)+ (hole LOAD 2 CHARACTERS 
096332 O22701 017254 CMP aMSGTAD, RL tect FOR LAST CHAR 
006336 001374 SNE 1$ :BR UNTIL DONE 1 LINE 
006340 005337 017150 DEC SET “FINISHED ALL LINES 
D06344 100367 BPL 2 BR IF NOT Z 
DOES46 012737 177777 024320 MOV a1 gButFER ‘LOAD MESSAGE TERMINATOR 
006254 004737 017604 GENER: JSR : GENERATE RANDOM NUMBER 
006360 913709 017702 MOV pen :GET R 
906364 042700 177745 BIC ul ,RO tRANDOM NO. MUST BE TWO DIGITS 
906370 020037 901524 CMP NO, MUST NOT BE GREATER THAN VHC 
006374 101367 BHI ; GREATER REGENERATION 
006376 610037 017144 MOV TORE RANDOM Y COORDINATE 
012737 Oe43S50 0:71:59 MOV ea SET :LOAD BASE POINTER 
006410 O10001 MOV RO,R 
H064i2 O01495 BEQ REAR ;RESULT, MINIMUM Y COORDINATE 
006414 963737 oo1S22 017150 1S: ADD WIDTH, SET :SETUP "Y INDEX LOCATION FOR PRINTOUT 
006422 905301 DEC 
O06424 001372 BNE ie sY COORDINATE IS SET 
NOE4SE 894727 017604 GENRx: JSR PC, SRAND ; GENERA TE RANDOM NUMBER 
006432 913700 017762 MOV SHINUM, RO : GE 8 RANDOM NUM 
006436 042700 177709 BIC #177700,R0 *RANDOM NO. MAY BE LESS THAN 200 
Nos442 (10037 O17146 MOV RO, XADDS : STORE RANDOM x COOR DINATE 
OOB44E 960937 017150 ADD RO: SET : SETUP x COOR, FOR PNTOUT. 
O064S2 013701 017150 MOV SET Rl :SETUP CHECK 
S06456 105711 STB Ss (RL) HAS CURRENT CHAR, ALREADY BEEN USED? 
NO64E0 100735 BMI GENER YES REGENERATE 
OOE4E2 113777 O17144 172766 HOVE —_YADDS, AVCPOSH ;LOAD Y COORDINATE 
006570 113777 O17146 17275 MOVB  XADDS’avcPOS § :LOAD x COORDINATE 
O06476 111137 024330 MOVE (RL), AtrFER “LOAD CHARACTER TO BE PRINTED 
O06 152711 000200 BISB #2007(R1) tINDICATE USE OF CURSOR POSITION 
OOSS06 004737 016032 ISR PC, XPRNT :EXECUTE AND PRINT CHARACTER 
51 104407 CKSWR ; TEST FOR CTRL 
E14 337 017152 DEC OVRAL !MAXIMUM NO. OF COORDINATES 
906520 901315 NE GENER :BR BACK UNTIL DONE 
06522 O04S37 Cibtte JSR RS, DELAY 
E26 O00i 100 


O06 ie! . 
SceS30 904737 017256 JSR PC, HOME ;HOME AND ERASE THE SCREEN 


en ew ee ee 


mn rr at 
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MGINDEC-11-D2VSE-A VSVE; VIEDO GRAPHIC TEST PROGRAM macys 27(1006) O2-DEC-76 17:42 PAGE 20 
| oSiseacet! 52-IuN-7— 00:50 723 CURSOR MOTION TEST 
léii ae has.” Rae ate GEE ee 
1z12 r#TEST 23 CURSOR MOTION TEST 
t213 s SRSSRSLFLASSSRESLESHSSEFELAASESLARFSSLSFASLESLELSSSFLSFESFSSLSES 
1224 906524 000004 +8123: SCOPE 
1215 006536 O0S737 901200 TST $PASS -TEST IF FIRST PASS OF PROGRAM 
1E16 O0G542 001562 BEG TST24 :;8R IF FIRS! PASS 
1217 O06544 032777 002000 17236 BIT #SW10, aSWR TEST IF INHIBIT VISUAL CHAR. PATTERNS 
1218 d06Ss2 001156 BNE ss TST24 ;;8R IF tyte17 15 SET 
1218 906554 004737 o172SE JSR PC HOME AND ERASE THE SCREEN 
i220 006580 Ne777 002000 172860 BIC eB{T10, avccsR ENABLE CURSOR 
ects 
1288 ;ROUTINE TO LOAD REFERENCE LINES FOR CURSOR MOTION TEST 
ce 
1224 OOES6E 012700 024330 LBMT: MOV sBUFFER,RO ;LOAD POINTER 
1225 006572 013701 01526 MOV VH1,R1 :LOAD Ri 
1226 006576 005301 DES RI 
i227 006600 004737 906676 ISR PC, MOVDNI ;MOVE CURSOR DOWN 
1228 O86604 004737 006714 JSR PC’ MOVRIG :MOVE RIGHT 
1229 O06610 112720 900062 MOVE =_ w62, (RO) + ;LOAD 82 
1230 006614 904737 006714 ISR PC, MOVRIG :MOVE RIGHT 
1231 006620 904737 O06714 JSR PC MOVRIG ;MOVE RIGHT 
1232 006624 112720 900040 Move #4, (RO)+ 
1233 006630 112729 905061 MOVE  861'(RO)+ ;LOAD 
1234 096634 004737 006572 JSR PC, MOVDWN :MOVE DOWN 
1235 906640 004737 006714 ISR PC’ MOVRIG :MOVE RIGHT 
1236 D06644 112720 900063 “OVE 863, (RO}+ :LOAD #3 
1237 OO6650 004737 006714 JSR PC, MOVRIG 7 
1228 OOS654 904737 006714 JSR PC’ MOVRIG ;MOVE RIGH 
12393 112720 00064 MOVB = #64, (RO) + ;LOAD #4 
1240 O06664 112710 000377 MOVE #377, (RO) ; TERM 
ied 006670 00420 ge Lent! :;BR TO NEXT PART 
1D43 OODSE72 013701 oO1S2¢ MOVDWN: MOV VH1,R1 
1244 O9667E 112720 OO0015 MOVDNI: MOVB #15) (RO)+ ;LOAD CR 
1e45 006702 112720 Oo0012 MOVE «#12, (RO)+ ;LOAD LF 
1246 006706 095201 DEC 
1247 006710 991372 BNE MOVDNI ;LOOP UNTIL DONE 
Lex 05€712 900207 RTS PC ;ESIT 
1250 006714 012701 900015 MOVRIG: MOV #16,R1 ;LOAD R 
1251 006720 112720 oc0040 18: MOVE 840: (RO)+ ;LOAD SPACES 
1252 906724 905301 DEC RI 
1253 006726 190374 BPL 1§ :LOOP UNTIL DONE 
1264 006730 090297 RTS PC sEXIT 
125E OO6722 204727 O1E0z2 LEMTI: JSR PC, XPRNT ;DISPLAY THIS LINE 
1257 D0673—E 004537 OIEcee ISR RS; DELAY 
tee 006742 O00144 160. 


a re ee | ee 















MAINOEC<12-D2VSE-A VSvVO2 VIESO GRAPHIC TEST PROGRAM MACY11 27:1906) O8-DEC-7E 
| DOVSER. FLL D2-JUN-76 90:50 T23 CURSCR MOTION TEST 


ree ;CURSOR MOTION SUBROUTINE 

1261 OO&744 013701 001526 Cem: MOV sLORD COUNT 

1262 006750 012700 924320 MOV nSLFFER, RO ;LOAD BUFFER POINTER 

1263 006754 112720 O00032 18: MOVE :LOAD A CURSOR UF 

1264 906760 281 DEC ait 

1265 006762 091374 BNE 1$ sLOOP UNTIL DONE 

1266 08764 112729 900130 MOVE 4130 (RO)+ LOAD ° 

ize? 006770 O12701 900049 MOV 840,81 COA COUN 

i268 OO677T4 lle72d 900010 23: MOVE #10, ROi+ ; LOAD *BRCKSPAC E «CURSOR LEFT) 

1269 907000 301 DEC ;DONE ALL 

1270 O07002 100374 BPL BH ;8R IF NOT 

1871 007004 112720 000130 MOVE #130,(R0}+ troAG °x" 

He Ban gee gee mie tacae, Heap Bageece 

efi ri ‘ ! . 

onl é ] ree Sie) Sas MOV e] »! Die OW 

‘S23 Basass Pisegd obs aTs 35 SVE b Tho est CURSOR DOWN 

ee Ge eS See ne 

4/8 sf id iy 

fa ee hee BBE ma yee Sa oc 

1 ra 7 ‘ Sa 

ee She tet BBs . ee Ee ee ne 
as 4S: Vv & ( + . G iT 

Ses facnes [Reao4 BCS ) 

tese 007 105374 PL LOOP UNTIL DONE 

1283 sarees teres eis NOV We ‘fais :LOAD *X’ 

s a ve , R é + 

t2es 857064 737 «O1e53=2 ISR P :DISPLAY THIS LINE 

186 007070 OO4S37 CLEbEE JSR RS; DELAY 


158 BETie AREAS RATER arose © AYE ln avecon «PREG CRRRSERBLACMEE 


PT 

123i $s SECERDRSESOREDESSRERTDORUREROOREESEDER ERROR NONSOERERIERORIOEDS 
izSe ;#TEST 24 

1233 SSPSPORERARALEDERRRERREDEDEPEREERERREEEREEREDRERESETARELER ESTE 
1294 O07210 900004 #4724: SCOPE 


ne 
BS 


Dt 


#2 


fururutut 


0 
vi) 


Rite EEE 


ates 


+> +0 +) 0-0 B «p68 


OOD NOU Lue +09 


el 


NO) Coll CIO) ICI CII LI 
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*: 


CItIGd 


atta 


—~ 


TRI ATR 
RRL 


ERS 


+ 0 + 0+ bb 2 0+ bs bh 2 2 4 8 8 = 8 he 0 8 8 oe 8h ooh 4 hae Fh he oh 8 8h 8h oh ah oh «hh O-* Oho he ho 


LAT 


Mtie res 
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e+. 
C0 
4 














FOS 


y$Vor VIEDC GRAPHIC TEST PROGRAM MACY11 27(1006) Oe-DEC-76 17:43 PAGE 32 


NOCHAR: NOP 


001120 901502 MOV SSDADR TEMP] :GET BASE ADDRESS 
9050S0 00150 AOD Tene Pl UPOATE TO Te NEE GODPESS 
O01252 o0436¢ MoV Haat VTMP ;GET THE NUMBER OF MAPS SELECTED 
lPr70e 4904368 orc tiP7788, fev IME MASK TO LOWER sfx aire 
BEG naPRTA "BR IF NO MAPS SELECTED 
354 SLR SUNIT :CLEAR MAP INDICATOR 
555: 901506 MOV #8170, TEMP :LOAD TESTING BIT 
001506 204369 MAPRTS: BIT TEMP3. DEVT TEST IF THIS BIT MAP IS SELECTED 
BEQ mapret :9 T 
907370 JME NUMa + SEL CTED - TEST THIS MAP 
OCoCe2 OC:SO2 MAPRET: ADD #20, TEMP! UPDATE TO NEXT BUS RODRESS 
061204 INC SUNIT : uPA TE MAP_INDICATOR 
991506 ASL TEMP3 -MOVE THE TEST BI 
900:90 oo1508 ce #190, TEMPS ha IF Fane MORE POSSIBLE “APS 
.SBTTL MULTIPLE MAP PATTERN 
901200 TST $PASS TEST IF ar rise 
BEG MAPRTA lf Fl T PA 
003576 ISR PC LODADR her ADDRESS 
001252 907342 MOV $chul 108 : GET of MBER OF MAPS 
17?77ou 6OO7S4e BIC #177700, 10 :MA _— 
007346 MOV #DUALPL. RO :LOAD POINTER 
007342 18: 7ST 10$ :TEST IF ANY EXIST 
BEQ 4§ BR IF DONE 
097242 ASR 108 ' TEST FOR NEXT MAP 
BCC 2 IF NEXT NOT SELECTED 
cet ee ean Ss 
? MOV + 
0073544 172160 MOV (Re S28. 8 ig ae SPE OR THIS MAP 
172146 MOVE = (ROS+, avGCSR 98D THE 0 SeCIN FOR THIS MAP 
podsoo 72149 gis ae avGCSR 
y 28: TST RO)+ :ADJUST POINTER 
003730 33: i5k FC, HOVROR "LOAD ADR OF NEXT MAP 
DLEEGE 4g: 158 RS, DELAY 
3F MAPRTA 
108: 0 
118: 9 
gos DUALPL: -BYTE 2,5 ;MAP #0 COLOR AND ORSIN 
956 ‘BYTE 14:6 :MAP #1 COLOR AND ORGIN 
951 “BYTE 60.1 :MAP 8 
ecg “BYTE 32.2 :MAP 
oe YTE ?°IS IMAP #4 
we -BYTE 63,16 : MAP at 
poocoo MAPETG: IMP DRETURN 


RETURN: 9 RETURN CONTROL 








GO3 


| MBINDEC “1. -D2VSE-8 E6E2 SIEDC GRAPHIC TEST PROGRAM MACYLL 271006) O8-DEC-7E 17:42 PAGE 22 
DIVSES.FLL 0 SE-lun-7— 22:50 LLTIBLE MAF SATTERN 
iis? 
i348 : THE BIT MAP ADDRESS IS IN “TEMP1™ - LOAD THE ADDRESS AND 
1398 START TESTING THAT BIT MAP 
2352 907379 913737 301508 OO1469 NUMBR: “OV TEMP1, VGCSR ;LOAD Sus ADDRESSES 
i356 SOrare Sizrse DObos Solves MOV TEMP 1; vGPC 
1353 3ér405 Gr5737 SCisds 501465 Mov TEMP; VGBUF 
2385 307812 013737 001502 O04 MOV TEMP’ VCOLR 
1385 DoT4el =O62737 000002 dO0i4e2 ADD #2, VGPC 
1255 OCTS2E O627S7 200004 301464 o 4 
is? 307534 Sei737 500010 01466 Ape #10, VGCOLR 
1358 SOrese 512737 O000e4 001102 Mov s$TN-1, STSTNM ;LOAD TEST NUMBER 
isséo jSERASELERSERALE SESE LESSER LEALLELLLALA AES LELELESELFSERAL SPAS ELE 
2383 :aTEST 25 TEST THAT ‘EXPAND’ BIT CAN BE SET 
ae i + SFLLSSLEREFRALALAAAALELLEEAELALLL LAA AAAEPLSTAARESLALAAESEAELAFELS 
1363 SO7452 o00004 tira5: SCOPE 
1364 D07452 C1273? oe4o0d 001124 MOV #81711, $GDDAT ;LOAD THE EXPECTED 
1365 DOH6O 013777 301124 171772 MOV SGDDAT ; VGCSR ;LOAD THE REGISTER 
1356 OOTSSE 517737 iPi7ee 01126 MOV JVGCSR: SBDDAT :READ THE REGISTER 
1367 OO7H74 DMe7S7 1713260 OOlls BIC #171360, $800AT MASK K 10 BITS 
2268 pO7Tsce Qes7a7 SOlie4 O01ize ie $6008T T, $800aT =n ico MPARE THE EXPECTED TO REC 
1375 OOS: 154006 ERROR 6 ; EXPAND’ BIT FAILED TO SET 
i37¢ jEEEEPRRERREEE ERELALALERALASALERERAL SEALE A SERRAAERESAR ERLE LER ES 
1373 :#TEST 26 TEST THAT 'MONO’ BIT CAN BE SET 
137% eat - > teem cabal tecone onr alepacamm cana taampann Ra 
gs 007514 00004 +8725: SCOPE 
i378 007516 O1e727 962000 001124 #81710, SGDDAT ;LOAD THE EXPECTED 
2377 907524 013777 001124 171726 Mov S$GDDAT; aVGCSR :LOAD THE REGISTER 
1378 32 Oi7737 17:722 O011e6 MOV avSCSR, SBODAT : READ THE REGISTER 
i37§ D07540 042737 171360 OO1iz€ BIC #171380 S$BDDAT sMASK 19 BITS 
1385 907546 023727 Collies Ofiize oMP SGDDAT, $BDDAT OORPARE HE EXPECTED TO RECWO 
1381 007554 901401 BEQ T :;BR IF SET 
1322 O5755— 104006 ERROR 6 ;*MONO’ BIT FAILED TO SET 
i284 ; RERRRSERASELERERASHERESEREERALELAREERR ERE EERE E LL PEPEEEELA RAE AE 
i3és SETEST 27 THAT "MAP ENABLE’ BIT CAN BE SET 
i386 + SESESRELSELELLERESRAAAARESLAAARELELAAARARRALARRATAELALALAATERARAE 
3387 07560 00004 té127: SCOPE 
1368 9 912737 000490 901124 MOV #8178 SGDDAT ob Te EXPECTED 
$282 pore7o Ola77? Gtlies i7ibbe Mov  — $GDDAT, a REGISTER 
1390 S76 017737 171656 O01ie6 MOV avGCSR. :R 
2391 4 042737 171260 Oo0112¢ BIC 8171260, SBODAT me 10° eit 7s 
1232 O0761e 923727 O01ie4 O0lize CMP SGODAT, $8DDAT “COMPARE THE EXPECTED TO RECVD 
1293 097620 00140) BEQ TST30 ;:BR IF SET 
1233 St7éze iD400€ ERROR & ;MAP ENABLE FAILED TO SET 


eee 0 ee oe ee 
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8 WSVO. VIEDC GRAPHIC TEST PROGRAM MACY11 27(1006) Oe-DEC-7E 17:43 


4 PRGE 34 
e-JUN-"é 00:00 T30 TEST THAT “ORGIN BINT" BITS CAN BE SET 


ath 5 ii-D avs 
el ~ 


1336 i SEEPRENUeNRN RNR ee eee eerie aetetr atte ten ie are 
i337 :ATEST 30 TEST THAT *ORGIN POINT’ SITS CAN BE SET 
1338 + SRESLEKLSSESRERELARAALERELASSSS ARLES SAELALLASSAERELSLSESFESS ESE 
1398 07624 000004 ST20: SCOPE 
1400 007626 Ole7a7? dO0764e 001110 MOV #1$,S$LPERR 
1401 OO7634 Ole737 000001 901124 MOV 88:10, SGODAT ;LOAD THE EXPECTED 
3402 O07642e 0137 001124 171810 1§: MOV scODat, aVGCSR ; LOAD THE REGISTER 
1403 O076S0 017737 171604 O011l26 MOV aVGCSR, SBDDAT ;READ THE REGISTER 
1404 O07656 042737 171360 OOlles BIC #171360 $8DDAT MASK K TO 
2405 OC7EES Oes7s7? OOlle4% OOlieb UMP $GDDAT, $8DDAT ‘COMPARE THE EXPECTED TO RECVD 
1406 907672 00140! BEQ BS ;:BR IF SET 
1407 OO7E74 104006 ERROR 6 N POINT’ BIT FAILED To set 
2498 OO7E7E 905237 O0li2e4 _ 2s: INC $GDDAT ete EXPECTED VALUE OF “ORGIN POINT’ 
1408 OO07702e Se2e737 O000e0 of112e4 CMP #20, $GDDAT FY ae VALUE FOR 'ORGIN’ 
i410 007719 00:354 BNE 1$ TEST 
lil syeapeneeseanestaneatestessneensoresuesberereesenneaeansereasecs 
islez :&TEST 3) TEST THAT CLEAR LOW BYTE DOES NOT CLEAR HIGH BYTE 
1413 TT MN I BS BR 
i414 07712 900004 tit31: SCOPE 
425 007714 912737 4 091124 MOV SBITLL'BITIO!BITS, SGODAT 
4i8 OD077e2e Ole7?77? O06417 171530 MOV SBITL1'BITIO!BITS+17, avGCSR 
1417 WO7730 «105077 17! CLRS aVGCSR ;CLEAR LOW BYTE 
2438 773% O17737 171520 OOLLZE MOV aVGCSR, SBDDAT sREAD the REGISTER 
2419 JO774e 042737 170360 001126 BIC #170360, $BDDAT ;MASK TO BITS 
1420 907750 923737 O01124 OOli2€ CMP SGDDAT, $BDDAT : TE 
421 307756 001431 BEQ TST32 :;BR IF § 
i4e2 007760 104006 ERROR 6 sCLEARING LOW BYTE OF STATUS CHANGED THE HIGH Sy 
i#23 : aERENEENGCHNeEs nonesnernanssstenatensehissnnensatbensneaetestey, 
i424 :#TEST 32 TEST THAT CLEAR HIGH BYTE DOES NOT CLEAR LOW BYTE 
1425 jPtEOeDeEECERAPEEREGRESEREHERRAEEEEREREEERREEEERREEER EERE EERE SS 
142 007762 900004 té132: SCOPE 
L427 OO77E4 012737 17 001124 MOV GODAT OAD EXPECTED READ VALUE 4 
1428 007772 012777 Oce4i7 I714é0 MOV sattiiteitioreiTeei7,avelse ;LOAD STATUS REGISTER 
1429 919000 0133790 O0i460 MOV VGCSR, RO ;MAKE ADDRESS 
ia: Sioooe | Toees Nee clean By BYTE 
. ou ns o ) ra i 
2426 ett Oe od 1 nap. 001 1e6 ae +f Sy, . ‘Ack weelatte 
i a °3 ibe g 
i435 SiEagS Beeha> Aarisa Bel i8e Bhp = S4DATSEDDRT TeRPeCT To Rev 
1435 010032 00340} BEG TST33 $3 
in O:S034 i04OD€ ERROR 6 ape Mi. HIGH BYTE OF STATUS CHANGED 
1432 jt Ra NDR si tir | AN 5, SARTRE 
1439 TEST 33 TEST THAT “RESET” CLEARS THE BIT MAP STATUS REGISTER 
1440 + EERSREESEEEASORESPEALSRSLESESSSRESERELALLESRALEAALASSSEL LEASE EE 
144i 919036 900004 a +§733: SCOPE anal DeECTED 
e Ld whe H 
144 te , BrSSe> Sea 171406 MOV #8! aa) lsprriorerresi7.avatse : a THE STATUS REGISTER 
i444 910052 900005 RESET sRESET THE 
e445 22D0S4 917727 371400 001126 mov avGCSR, $B00AT ;READ THE REGISTER 
ia46 S150ee O4e737 i7isé= Ociize BIC #171366, $5007 MASK TO OTHER BITS 
i447 £19570 ed BEG TST34 77BR IF EL EARED 
1448 210072 1040 ERROR 6 ;RESET FAILED TC CLEAR SIT MAP STATUS REGISTER 





. 
© 
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OOAI0o0V00N © 
> +d-* 6-2 p=» «9-29 <p + ~-" 
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CJ Tue b- = ie 
SWeueERuo 


-+b-+ b+ 0-8 CD 


1] oe | on | ae] oe | os | oe) 


0+ b= b= ps bp 
OoIo0ooo 





















: nes I03 
oe : 
BETS ine EYES TEES RRP eT Eonar "RESET" MPG RE OE’ APOB Sep statis ae3 


ff ERERSRALAESEAA LALLA RETASLAFLELEFERELFELEL SESE RFLERSFLELSRE LAE SHS 


;#TEST 34 TEST MAP READY AND CLEAR MAP BITS 
— Re ee ee 
weve 


SCOPE 
; TEST THAT WRITTING fy § (CLEAR MAP) CLEARS MAP READY (BIT 


05037 901124 CLR $GDDAT ;CLEAR EXPECTED 
005037 o0112¢ &LR SBUDAT CLEAR RESULTS 
094537 Cl1ébeE ISR RS, DELAY :WAIT FOR VERT SYNC 
100081 BITIS!! 
777 001090 171336 BIS #8179, aVGCSR ;SET “CLEAR MAP” BIT 
liv73? 171322 OOl12€ MOVE  aVGCSR, SBDDAT *READ VG STATUS REG 
10000: BPL 1$ ::88 IF CLERRED 
1O4018 ERROR 14 -BIT MAP READY NOT SET 
;TEST “CLEAR MAP” BIT SETS 
012737 oo1g00 OC1124 18: MOV #8179, $GDDAT +1980 EXPECTED 
oS 27 O18665 JSR RS, DELAY : OR VERT SYNC 
190001 BITiS'BITO 
017737 171304 o01126 MOV JVGCSR, SBDDAT :READ MAP STATUS REG. 
5 8 O01124 O3llz6 gir $G00AT, *SBDDAT TEST IF BIT IS SET 
1051 NE $ :;BR IF SE 
1048) ERROR 14 ;CLEAR MAP BIT FAILED TO SET 
:TEST THAT “MAP READY” CLEARED 
005037 001124 28: CLR $GDDAT : CLEARED EXPECTED 
10737 OOll26 TSTB  $BDDAT TEST BIT 
190001 BFL 3$ ;;BR IF CLEARED 
104034 ERROR 14 TING “CLEAR MAP* BIT FAILED TO CLEAR “MAP RE 
: TEST THAT MAP READY RETURNS AFTER 2 VERT SYNC TIMES 
904537 DIGbE6 38: ISR RS, DELAY ;WAIT FOR VERT SYNC 
1008 BITIS!2 
012727 oo0200 001124 MOV 88177, SGDDAT sLOAD EXPECTED 
017737 171234 OClize MOY avGcsk, $BDDAT READ STATUS 
3737 001124 O01126 gr! SGODAT, SBDDAT TEST IF BIT IS SET 
1061 NE 4 :;BR IS SE 
104314 ERROR 14 ;MAP READY FAILED TO SET AFTER CLEAR MAP 
;TEST THAT “CLEAR MAP” BIT WAS CLEARED 
005037 o00:124 4S: CLR SGDDAT s CLEAR EXPECTED 
932727 001900 ool1ee BIT #8179, SBDDAT TEST FOR CLEARED SIT 
001401 BEQ TST35 ::8R IF ELEARED 
104014 ERROR 14 ;MAP READY SET BUT “CLEAR MAP” BIT FAILED TO cL 





JO3 
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D2VSEA.P11  O2-JuUN-7& 09:00 TEST MAP READY AND CLEAR MAP BITS 
1497 
1438 3 5 SAARAERALERELE LARA RA LAELAE LALLA LER LLL LEAL RE LELELELEFSLELA LESS EF 
1499 :&TEST 35 READ-WRITE TEST OF THE LOW 3 BITS OF THE MAP P.¢. 
1598 © SEREFARECHERASSSESRARALSLE LARA RAASRARAAAAAALELSLAZERAAAELEFLARELSE 
15 019858 pogooy - $6735: SCOPE 
ié } leva? 010276 O01110 MOV #13, SLPERR 
1503 910266 005037 091124 CLR SCODAT ;CLEAR EXPECTED READ VALUE 
504 b1027e g050 ? 0 1474 SLR : “CLEAR WRITE VALUE 
150S 419276 0137 1474 171156 18: MOV TEMP, JVGPC iL MAP P.C. 
1506 010304 017737 171150 001126 MOV aVGCSR, SBDDAT ‘READ STATUS (BIT MAP) 
1507 10312 O42737 177617 901126 BIC #177617, $BDDAT :MASK TO UNUSED BITS 
1508 010329 023737 001124 OOlle6 CMP S$GDDAT, $BDDAT “TEST IF SAME 
1508 010326 90140: BEQ zg ::BR IF Sane 
1519 010330 104007 ERROR 7 BIT tne P.-C. DID NOT LOAD 
1E12 010332 062737 oO00020 0O1124 28: ADD #20, SGDDAT :UPDATE EXPECTED READ VALUE 
i513 9 bs 37 901474 INC STEMP UPDATE EXPECTED WRITE VALUE 
1514 010344 022737 O00010 001474 CMe #10, STEMP : TEST FIRST NON-VALIC 
1e15 019352 901351 BNE 1$ :BRANCH IF STILL OK VALUES. 
a 
1517 s 5 FHAAALAELELA LS RHA LALLLLALL ALLELE LAE TLE LALAALRERALE LAA ERALELLALSE 
1518 : 3% STATIC BIT MAP P.C. INCREMENT 
151 ©  SLESRELASSERAAESRAS AA LARA AAA LAAARASEAALESERALERAALAEEAARAAAFERARAZE 
1520 019354 oo0004 +6736: SCOP 
1521 910356 012737 010376 001110 MOV #18,$LP RR 
1582 010264 Oie737 900020 001124 MOV 5 AT ;LOAD EXPECTED READ VALUE 
1523 010372 005077 171064 CLR aVGPC :CLEAR MAP P.C. 
1524 010376 012777 177777 171060 1S: MOV #-1, JVGBUF :LOAD A PIXEL 
1525 010404 012700 900100 MOV ee1ts, RO *LOAD DELAY COUNT 
1526 O10410 105777 171044 2s: TSTB = aVGCSR ‘TEST IF MAP IS READY 
1527 O1o4is 100403 BMI 4s : YES 
1528 O:04i6 005300 DEC ; DEL 
1223 010420 091373 BNE 3$ :BR IN NOT EXCEEDED 
1230 910422 104014 ERROR 14 :MAP READY FAILED TO SET 
1531 010424 017737 171030 O01126 4S: MOV AVGCSR, SBODAT ‘READ RESULT VALUE FROM BITS 4-6 OF CSR 
1532 010432 042737 177617 OO11DE BIC #177617. SBDDAT *MASK TO UNUSED BITS 
1533 910440 923737 001124 OOlle6 CMP SGODAT , $80DAT “TEST IF SAME 
1534 10446 O514G1 BEG 23 ::BR IF SANE 
1525 O104so 10401 ROR | ;BIT MAP P.C. FAILED TO INCREMENT 
1536 :BY LOADING BUFFER WITHOUT LOADING P.C. 
ee UE Gee RU ERT EET tctroke BSS thekbeem 
ad rd = 4 s i ay 
1523 Ribsee Beton a ::8R IF AORE Bits 
eo tlw 





C2-IUN-7E 02:00 


AAA EE 


Be 


RK RGA 
EOLBS LS 


NOHOHOV VO HVOOVOOVOVOVAVIVOV0N000 


> +b +0 6 0—- b= 6 +6 & = B= b+ b= bs b- b-< oh 9 pe 
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VSVOi VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006) Oe-DEC-7E 17:43 PAGE 37 
09:00 T3? READ-WRITE WORD TEST OF PIXEL 0,1,2 AND 3 -- BIT CO 


5g FRAARAEAAA REA SARAARELELA RARE LALALEL LEE REE ALERELFLE LEAL ERAS ERELFE 


:&TEST 37 READ-WRITE WORD TEST OF PIXEL 0,1,2 AND 3 -- BIT 3D 
REALE EERE EERRE REELS REESE EEE EE RAE RELEEEEE EEE ERESEAEREEESE ESS 
pooo04 E727: SCOPE 
Gre Gs gay HEE er ap exrecen mee vee 
piscae BAS BAT apt asy MOV SEiTO STERP it Bap EXP TER RET tE VALUE 
905077 170742 1$: CLR aVGPC RESET P.C. 
005077 170740 CLR aVGBUF :CLEAR DATA 
005077 170732 ELR aVGPC : PC 
105777 170724 33: TSTB = aVGCSR WAIT FOR MAP READY 
100375 BPL 3$ 
013777 001474 170720 MOV STEMP, JVGBUF :LOAD WRITE VLUE 
105777 170710 4$: TSTB aVGCSR :WAIT FOR READY 
100375 BPL ug 
017737 170702 001126 MOV JVGCSR, SBDDAT ;READ RESULT VALUE 
042737 007777 001126 BIC 87777 , $BDDAT :MASK TO UNWANTED BITS 
023737 001124 OO1126 CMP $GDDAT, SBDDAT “TEST IF SAME 
001401 pea es ;38R IF 
104011 ROR [i :BITO OF A PIXEL FAILED 70 SET 
096337 001474 2s: ASL STEMP : ADJUST 
O63 7 001474 A $1 MP : T 
3 1474 a TEMP : WRITE 
006337 091474 ASL STEMP > VALUE TO THE NEXT PIXEL 
006337 801124 ASL $GDDAT :ADJUST THE EXPECTED READ VALUE 


901333 BNE 1$ ;BR IF; MORE SITS TO TEST 
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: MAINOEC=11-D2VSE~A VSVOl VIEDC GRAPHIC TEST PROGRAM MACY1L 27(1006) O2-DEC-76 17:42 PAGE 26 
| DZVSEA.P11 © O2-JUN-7& 00:09 13? READ-WRITE WORD TEST OF PIXEL 0,1,2 AND 3 -- B17 0 
| 13b8 a5 SFRELAAAAESAALERESHAARAASAAFARALRSAAALALSLSLERAFLAEARSLSFRALALES HF 
1570 :#TEST 40 BASIC LOOK UF TABLE (L.U.T.) TEST 
ie yt Saladad +44) Saleladalelalaiahalalalahababahahahabalaichalahahaiabaichaiahahslahalsiaisiaieisiieisiaiaisiaininislaiel 
i572 010626 oo0004 tét40: SCOPE 
| 1573 010630 O0S737 901544 TST BURN s TEST IF IN “BURN-IN” MODE 
1574 O19634 001408 BEQ 23 F NOT 
1575 010836 013777 OO1SH6 170704 MOV COMXSW, ICOAX ONCE THE RELAY 
1576 910644 O004S27 C1bb65 JSR RS, DELAY :WAIT FOR RELAY TO SETTLE 
1577 O10650 o000i2 10. 
| 1578 010652 23: 
| 1579 010652 095737 oD1200 TST $PASS -TEST IF FIRST PASS OF PROGRAM 
| 1580 O10656 O014ee BE TST4] ::BR IF FIRST Pass 
| 3581 010660 632777 001000 170252 BIT #5W09, aSWR TEST IF INHIBIT VISUAL MAP PATTERNS 
158 01066 CO!0i6 . BNE TST4 ::BR IF iNHIBIT IS SET 
| 1584 010670 004737 017306 ’ ISR PC, TESTID ;DISPLAY MAP &# AND TEST & 
| 1586 010674 004737 016234 JSR PC, CLRMAP :CLEAR THE BIT MAP 
| 1528 010700 o04S37 o17D62 ISR RS,LODSTA ;LOAD THE SEQUENCE TABLE 
| 3589 010704 909000 0 *LOC O WITH 14 - LOC 1-17 WITH &2 
| 1590 010706 O1ESO5 TABLE3 
153 910710 012777 ocoe4oO 17DS4e MOV #2IT10!BIT8, aVGCSR sENABLE THE MAP 
| = 
1594 10716 004537 OCI1EbEE ISR RS, DELAY 
1595 619722 000144 100. 
1597 ‘ ifeer a] STATIC INTENSITY LEVEL TEST (LUT OC) 
, 1&9e : &TE STATIC INTENSITY LEVEL TEST (L.U.T. 
' 1599 ahs ile SO 1 LU OR UR OL 
' JOG 010724 op0004 +éT41: SCOPE 
101 010726 005737 oo1200 TST SPASS TEST IF FIRST PASS OF PROGRAM 
1602 010732 001427 BEQ TST42 :;BR IF FIRST F ASS 
1603 010734 032777 o01000 170176 BIT #505, a EST IF INHIBIT VISUAL MAP PATTERNS 
1604 910742 o01023 BNE TS5T42 ;;BR IF INHIBIT IS SET 
1605 010744 904737 017306 ISR PC, TESTID sDISPLAY MAP # AND TEST # 
1607 010750 004737 016234 ISR PC, CLRMAP ;ENSURE CLEAR MAP 
' 1699 O10754 012777 o0e400 170476 MOV #BIT10!B178, aVGCSR sENABLE "MONO’ AND *MAP’ 
| 1619 010762 012737 000017 9001474 MOY #17, STEMP 
13 010770 013777 OD1474 170470 1S: MOV STEMP, IVGCOLR ;LOAD LOC. O WITH A INTENSITY LEVEL 
4612 010776 904537 Ol66EE JSR RS, DELAY 
sey Ot pond 10. 
| ets O11 AP 001474 é STEMP sREDUCE THE INTENSITY LEVEL 
i616 011010 901367 BNE 1g ::BR IF MORE LEVELS TO TEST 
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904537 
000144 


VSVOi VIEDO 
00:60 
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001200 
001000 
017306 


O16666 


001200 
001000 
017306 


016234 
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170014 
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O2-DEC-76 17:43 PAGE 39 
(FIRST MAP LOCATION) 


Se FRFSAFSARARAAEARASHERAAASRA RELA LALA LALA AALLERALLLALAELERALEREREE 
T 


MACY11 27(1006) 


GRAPHIC TEST PROGRAM 
THz DYNAMIC WORD TESTING OF PIXEL 0 


DYNAMIC WORD TESTING OF PIXEL 0 
o> og °c gga emennerrs cigR oR sanCE: 


-TEST IF FIRST PASS OF PROGRAM 
:;BR IF FIRST PASS 
TEST IF INHIBIT VISUAL MAP PATTERNS 
:;BR IF iNHIBIT IS SET 
‘DISPLAY MAP # AND TEST # 


ts a THE MAP 
;SET *MONO’ 


(FIRST MAP LOCATION) 


PC, CLRMAP 

sBtT10, aVGCSR 

sLOAD 4 INTO LUT; 9 AND 
AD #17 IN 


{LOAD pINELO Bf BiTO 
ENABLE THE MAP 


1 ty Set th te ee rh 
43 DYNAMIC WORD TESTING OF PIXEL 
jsbaeeniesassennnsuabansaseaniosnsantonssHtaesantateanenatoa 


: TEST T IF FIRST PASS OF PROGRAM 
Eat oF IF INHIBIT VISUAL MAP PATTERNS 
:;BR IF iNHIBIT IS SET - 
;DISPLAY MAP # AND TEST # 


;CLEAR THE MAP 
;SET 


(FIRST MAP LOCATION) 


CLRMAP 
HOLTIO. aVGCSR 


LOAD #17 INTO L.u. 


vy LEAR MAP P.C. 
;LOAD PIXELD BITO 
ENABLE THE MAP 








3 oR 


SERB EES 


OKO000000 OO DOO0000 
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GW) 








MAINDEC-11-D2VSE-A 
H O2-JUN-76 
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012777 
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VSVO1 VIEDO i TEST PROGRAM 
00: CO T44 DYNAMIC WORD TESTING OF PIXEL 2 


001200 
001000 
017306 
us 


017062 


167720 


170220 


170202 
170170 


1§7624 


170124 


170106 
170074 


PC, TESTID 

PC, CLRMAP 
#BiTI0,aVGCSR 
RS,LODSTA 
aVGPC 

#400, aVGBUF 


#8178, JVGCSR 
RS, DELAY 


Soe a eee t eae ea a Oa) TESTING OF PIXEL 2 (FIRST MAP LOCAT 


YNAMIC WORD TESTING OF PIXEL 3 
Tabbed dengneoTesuaantonusauiobesesnsasberenansneesiaaase 


-TEST IF FIRST PASS OF PROGRAM 
:;BR IF FIRST FA Pass 
IF INHIBIT VISUAL MAP PATTERNS 
;;BR IF infor? IS SET 
sDISPLAY MAP # AND TEST # 


;CLEAR THE MAP 
;SET 


TST46 
#SWO9, JSWR 
TST 


STu6 
PC, TESTID 
PC, CLRMAP 
#8iTI0, IVGCSR 
RS5,LODSTA 
VGPC 
#10000, avGBUF 


RS te 





O2-DEC-76 17:43 PAGE 40 
(FIRST MAP LOCATION) 


5 FERARAALER RRL AR REEL EARL AREAL ALE L ALE AA RAE LER ER ELE LER LELAL ERE RES 


DYNAMIC WORD TESTING OF PIXEL 2 
Cp eames tegen 


: TEST I FIRST PASS OF PROGRAM 
TF INHIBIT VISUAL MAP PATTERNS 
:;BR IF iNnTBIT IS SET 

;DISPLAY MAP # AND TEST # 


sCLEAS THE MAP 
;SET ’MONO’ 


MACY11 27( 1006) 


(FIRST MAP LOCATION) 


jLOAD 4 INTO L.U.T. 0 A 
; LOAD #17 INTO L.U.T. 


;CLEAR MAP P 
i PIXEL2. Sito 
MAP 


(FIRST MAP LOCATION) 


;LOAD 4 INTO L.U.T. O AND 
; LOAD #17 INTO L.U.T. 





se. LEAR MAP P.C. 
;LOAD PIXEL3 BITO 
;ENABLE THE MAP 


rales is “Cees 
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VIEDC GRAPHIC TEST PROGRAM MACY11 27(1006) Oe-DEC-76 17: 242 PAGE 
T46 DYNAMIC WORD TESTING OF *PIXELO’ PENCREMENT Map F.C.) TES? 


eect Ga DYNENIIC EID TESTING CE PIMELD (INCREMENT Pre B 


STEST 46 DYNAMIC WORD TESTING OF "PIXELO’ (INCREMENT MAP F.C.) TEST Lou 

i Teaoesbenonsnaneoeisasocnesasioseseasossivesbososetnarsee’ © 
TST SPASS - TEST If FIRST PASS OF PROGRAM 
BEG TST4? ::BR IF FIRST 
BIT 8SW09, ISR EST re INHIBIT VISUAL MAP PATTERNS 
SNE T5747 ::8R IF inefer! 15 SET 
ISR PC, TESTID “DISPLAY MAP @ AND TEST # 
JSR pc’ cL 
SR RS; LODSTA L080 COLOR TABLE 
6 Loc O BND 2 THRU 17 WITH 0 
TABLE2 re 1 WITH A I 
CLR VGPC sLOAD MAP P.C. TOC 
MOV VGBUF , RO *LOAD PIXEL ADDRESS 
MOV NUMPTX, Rd “LOAD # OF PIXEL 

18: i378 avGcSR :WAIT FOR MAP READY 
Mov 1, (RO? :LOAD BITO OF PIXELO 
DEC Rl *FINISHED ALL PIXELO’S 
BNE 1§ :BR IF NOT 
MOV SBITLO‘EIT8, avGCSR *ENABLE THE MAP 
JSR PC,LDLIN !LOAD REFERENCE LINE 
15h RS; DELAY 


ireeT gy TRINANIC WORD TESTING OF PIXEL 1” CINCREMENT SLEEE 


‘ETE DYNAMIC WORD TESTING OF ’PIXEL1’ (INCREMENT MAP P.C.} TEST L.U.T. 
i ierteencovaguasanonesnnnnasoneostoanvansansaieansbetoannoneaaees 
TST $PASS -TEST IF FIRST PASS OF PROGRAM 
BEQ TSTSO ::BR IF FIRST PA 
BIT 85W9S, aSWR - TEST a INHIBIT VISUAL MAP PATTERNS 
BNE TSTSO ::BR IF INaTB BIT IS SET 
JSR PC, TESTID “DISPLAY MAP # AND TEST # 
JSR PC’ CLRMAP 
JSR RS; LODSTA ;LOAD COLOR TABLE 
0 ?LOC OQ AND 2 THRU 17 WITH O 
TABLE2 ‘TOG 1 WITH A 17 
CLR aVGPC sLOAD MAP P.C. TO 0 
MOV VGBUF , RO s LOAD PIXEL ADDRESS 
MOV. | NUMPIX,RI Load 8 IXELS 
18: ISTE avec HA Fos F ape READY 
MOV #20, (RO) ;LOAD BITO OF PIXEL! — 
DEC i FINISHED ALL PIXELI'S 
NE is :B NOT 
MOV a81T10: BITS, aVGCSR EN PBL E THE MA 
JSR LOLIN LOAD SCE ERENCE LINE 


JSR RE" DELAY 








am ne ee RE 
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VIEDO sata TEST PROGRAM MACY11 27(1006) Oe@-DEC-76 17:43 PAGE 42 


a? al . = 
| MBINDEC-11-D2VSE-8 


VSvCi '\ 
| D2VSER.PL1 «© -O2-TuN-7§ 99:00 Té0 DYNAMIC WORD TESTING OF 'PIXEL2’ (INCREMENT MAP P.C.) TEST L.u.t. : 
1763 5 FFRELSSARERARALSSARELELFLAKASFLERSLLSLELEREFSLERAFLELLLSESLSEFLERSE 7 
1781  STEST 50 DYNAMIC WORD TESTING OF 'PIXEL2’ (INCREMENT MAP P.C.) TEST L.uLT. 1 
&, $e “Og aeagg garcia ooo tr roi aac gem aee t 
1763 O11616 900004 tits COPE 
I7S4 O11620 OOS737 901200 TST $PASS - TEST lf FIRST PASS OF PROGRAM 
1765911824 00144: BEG = TSTS1 BR IF FIRST P 
1766 911626 032777 901000 167304 BIT sSW09, ISWR - TEST re INHIBIT VISUAL MAP PATTESNS 
1767? OllIES 051036 SNE 15751 SR IF tNHIBIT IS SET 
1768 «D1IS36 OO4T37 O17 ISR PC TESTID -DISPLAY MAP # AND TEST # 
I7ES  CLIES2 DONTE? S1bE34 35k PC; CLRMAP 
iv7O Ol1e46 OO4S37 017062 JSR RS; LODSTA LORD COLOR TABLE 
177} pi 165e 990090 9 BND 2 2 THRU 17 WITH C 
eae 11e54 SIes66 TABLE2 it Be ? WI 
i774 DLIESE 167600 CLR aVGPC sLOAD MAP P.C. TOC 
1775 Ollg62 013 001464 MOV VGBUF , RO :LOAD PIXEL ADDRESS 
iv7& 011656 013791 o01s4e MOV 1X,R *LOAD # OF PIXELS 
1777 011672 7 167562 18: TSTB = aVGCSR “WAIT FOR MAP READY 
1778 O11876 100375 BP 1$ 
i77S 011700 O1e715 oo04c0 MOV #400, (RO) :LORO BITO 
1780 011704 00536) DEC Rl :FINISHED ALL Saas z 
1781 011706 001371 BNE 1$ -BR IF NOT 
1782 O11712 012777 oo2400 1675842 MOV #BITLO'BITS, aVGCSR -ENABLE THE MAP 
3783 011716 004737 017554 JSR PC, LOLIN ‘LOAD REFERENCE LINE 
17& OL1722 OO4S37 OIeeée ISR RS, DELAY 
+78 Dil726 500144 100. 
1787 5 RERELRERESERESEASEAEE ARSE ERELERERELERRELSLELLL SEL ELAR ELLE SLES 
i782 :STEST Si DYNAMIC WORD TESTING OF 'PIXEL3° (INCREMENT MAP ©.C.) TEST L.U.T. 1 
1785 = FFSLESFSSELSESSLSARERAALERSSRELSFLHELALLELLESESASSEAELSLAELARSERELLEAE 
173C 011730 900004 *ST51: SCOPE 
17$1 011732 005737 oo1200 TST $PASS - TEST IF FIRST PASS OF PROGRAM 
i792 01173§ O0144) BEQ TSTS2 :3BR IF FIRST P 
1793 911740 032777 cOLO0O 1¢7172 BIT #109, ASUR TEST re PNHIBIT VISUAL MAP PATTERNS 
1794 O11746 901035 BNE TSTS2 ::BR IF intext IS SET 
1795 O11750 004737 017306 ISR PC, TESTID sDISPLAY MAP &# AND TEST » 
179% 011754 004737 316234 ISR PC; CLRMAP 
1787 011760 904537 017062 ISR RS‘LODSTA ;LOAD COLOR TABLE 
1798 OLI7E4 :LOC 0 AND 2 THRU 1? WITH O 
1733 O1176& ClE46 TABLE2 :LOC 1 WITH A 1 
1851 011770 LE74EE CLR avGPC sLOAD MAP P.C. TO 0 
1802 011774 013700 OO14E4 MOV VGBUF , RO :LOAD PIXEL ADDRESS 
1803 612090 913701 oo1s4e MOV NUMPTX, RI *LOAD # OF PIXELS 
1804 012004 105777 167450 18: TSTB aVGCSR ‘WAIT FOR MAP READY 
1605 Oie0i9 375 BPL 1$ 
i896 Ol2e0le 012710 o1cooo MOV #10000, (RO) sLOAD BITO OF PIXEL3 
1807 O12016 301 DEC :FINISHED ALL PIXEL3°S 
1208 912020 001371 BNE ts :BR IF NOT 
1809 012022 912777 O02400 167430 MOV tarT10! BITS, aVGCSR :ENABLE THE M 
16:0 912030 004737 917554 ISR PC, LDLIN LOAD SCE ERENCE LINE 
1611 12034 OO4S37 O16 JSR RS; DELAY 
16:2 212040 B00]44 100. 
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VIEDC GRAPHIC TEST PROGRA 
oyNanic "WORD TESTING OF ‘PIXELO’ (INCREMENT MAP Bc C.3 


5p SFHAARSHAERSASESLTSASLERELELSFLSELEFLELFSALESERLAAEFLEFFLELLFFERELFSE 


;®TEST Se 


‘ar 


rST&e 


1$: 


pret eg DYNAMIC LORD TESTING OF PIXEL1” CINCREMENT MAP P 


‘ATES YNAMIC WORD TESTING OF ’PIXEL1’ (INCREMENT MAP P.C.) TEST L.u.T. 2 
jeeaeeoasoasnassuensennsnatonsontaseonsansadionsansantanonstansy 
TST SPASS -TEST IF FIRST PASS OF PROGRAM 
BEQ TSTS4 ::BR IF FIRST PA 
BIT 8SWO9, a TF INHIBIT VISUAL MAP PATTERNS 
BNE TST54 ::BR IF inter IS SET 
JSR PC, TESTID DISPLAY MAP # AND TEST # 
JSR PC’ CLRMAP 
JSR RS; LODSTA ;LOAD COLOR TABLE 
fe tL Q,1 AND 3 THRU 17 WITH O 
TABLES *LOC 2° WITH A 17 
CLR avGPc sLOAD MAP P.C. TO 0 
MOV VGBUF ‘LOAD PIXEL ADDRESS 
MOV NPI, R 1 ‘LOAD # OF PIXELS 
1S: STB evGcSR ‘WAIT FOR MAP READY 
L 
MOV #40, (RO) ;LOAD BIT! OF PIXEL1 _ 
DEC Rl eT ALL PIXEL1'S 
MOV sBITIO! BITS, AVGCSR !ENABLE THE M 
ISR PC,LDLIN LOAD SER ERENCE LINE 
i5R RS: DELAY 


- EPREPERSERESERSRESESE LEDER SESSESEASS SESEEE EES EASELS SELES SES ESS 
a 
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MACY11 27(1006) O2-DEC-7& 17:43 PAGE 


~ 
TES! Lou.t. 4 


~4ta 


DYNANIC WORD TESTING OF “PIXELO’ (INCREMENT MAP F.C.) TEST L.U.T. = 


SPASS - TEST IF FIRST PASS OF PROGRAM 

S753 -:BR IF FIRST P 

#5u08, aswe TEST iF INHIBIT VISUAL MAP PATTERNS 
:;BR IF tNHIBIT IS SET 

et “TESTED sDISPLAY MAP # AND TEST # 

RS. LODSTA ;LOAD COLOR TABLE 


LOC 0,1 AND 3 THRU 17 WITH O 
LOC 2 ‘WITH A 17 


avGPC sLOAD MAP P.C. TO 0 
VGBUF , RO :LOAD PIXEL ADDRESS 
NUMPIX, Ri ‘LOAD # OF PIXELS 

avGCSR ‘WAIT FOR MAP READY 
82, (RO) -LOAD BIT1 OF PIXELO 
RI sEINISHED ALL PIXELO’S 
i$ :BR IF NOT 

#BITIO'BITS, aVGCSR :ENABLE THE M 

PC,LDLIN LOAD FEE ERENCE LINE 
RS; DELAY 


MEINDE C=] oe L-DIVSE-8 


DIVSER. 


0-< <9 p< 6 <9 


1891 


ference ty bey 


y8 OO Oe 


ptsisic 


BURA 


> <b -+ b+ &-+ &- + b= 6 b-2 b= b-< 0 2 bh 2 & 2 0 hs F280 * D2 2 0 oo 
83828 8 


w0.0.0.0.0.0.0.0.0W0 
0+ 0 + 0+ bb -2 b= 2 ode 
WMONMW WMO Ww 


Pil Ue-JUN-"é 


gases 


737 
004537 
000144 


902400 
O17554 
C1EE5E 


901290 
001900 


Biesas 
017062 


167016 
001464 


Te 806 
027000 
002400 


017554 
C1lEBEE 


i VIEDC GRAPHIC TEST PROGRA 
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Y11_27( 1006) 
DYNAMIC "ORO TESTING OF *PIXELe’ 


Og-DEC-76_ 17:4 Pie 


44 
(INCREMENT MAP "3 stad Tet 


E 


; FHERELEAAARALERSLEL EEA EL LAA ELELELASELAREAEERLLLE TLE LF ELLELAE SES 


: AEST Su DYNAMIC WORD TESTING OF ‘PIXEL2’ (INCREMENT MAP P.C.) TEST L.u.T. 2 
ee ee er a te ee ee 
i cy. H 
#87 SPASS -TEST IF FIRST PASS OF PROGRAM 
REO TST5S 5:BR IF FIRST PASS 
BIT sSWOS, ISWR TEST IF INHIBIT VISUAL MAP PATTERNS 
3 T5755 :;8R IF tNHIBIT IS SET 
3s PC, TESTID “DISPLAY MAP # AND TEST 
JSR PC; CLRMAP 
oR RS; LODSTA ; LOAD COLOR TABLE 
0 LO AND 3 THRU 17 WITH O 
TABLES TC 2" int Al 
CLR avaec sLOAD MAP P.C. 
MOV GBUF , RO “LOAD PIXEL “Aopress 
MOV NUP Ri “C0 
18: i378 av WAL Pot MAP READY 
MOV #1000, (RO) -LOAD BIT! OF PIXEL2 
DEC Rl EAN PED ALL PIXEL2’S 
MOV 'BITB, AVGCSR NABLE THE MAP 
C,LDLIN TOAD REFERENCE LINE 


P 
; RS; DELAY 


5 RRRELEEPRERELEEERRAE EEE ERE REL EER ERAE LER EE REAR ELE ALLER ELE SE ERE 
;#TEST SS DYNAMIC WORD TESTING OF *PIXEL3’ (INCREMENT MAP P.C.) TEST L.U.T. 2 
 LEEEEEEREREERERAR ALARA LE EELS AERA RARE RE RELA ELLE LEA EEE EERE EE EE 


tétss: SCOPE 


T PA 
BEQ $EFeP 
BIT #5105, aSHR 
BE ne Esra 
SR PC’ CLRMAP 
JSR RS‘LODSTA 
FoBLee 
CLR avGPC 
MOV VGBUF , RO 
MOV NUMPIX, Ri 
1S: TSTB = VGC 
BPL 1$ 
MOV #20000, (RO) 
DEC 
BNE tg 
MOV #BIT10!B1T8, aVGCSR 
JSR PC,LOLIN 
J5R RS; DELAY 


:;BR IF Pest 


Bot FIRST PASS OF PROGRAM 
EST IF Inazert VISUAL MAP PATTERNS 


a» inept Reb # AND TEST & 


; LOAD Cue. TAB 
sO 
‘int al 


;LOAD MAP P.C. 70 0 
;LOAD PIXEL RODRESS 


LRT? ob nab RE Dy 


3 THRU 17 WITH C 


;LOAD BIT] OF PIXEL3 
Ria ALL PIXEL3°S 


ENABLE THE MA 
;LOAD REFERENCE LINE 
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| MSINDEC-11-D2VSE-A VSVCi VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006) Q2-DEC-7E 17:43 PAGE 45 
| C&VSER.FLL O2-JUN-"6 09:00 TS& DYNAMIC WORD TESTING OF ’PIXELO’ (INCREMENT MAP P.C.) TEST L.U.T. 4 





1825 ‘ 5 FEAARESLSAERERARELERLASLALAFLESSLELE LET RE LEE RALSLELELLSELESERELREE 
192) :#TEST S& DYNAMIC WORD TESTING OF 'PIXELO’ (INCREMENT MAP P.C.) TEST L.uLT. Ss 
1822 ii SERAREKSSRELASAEAAEAEHSRERESSSSEALESE LAA LEAL ERAAASRESLASLAFLL FSFE 
1923 oO1esi2 ooo0D4 tSTS&: SCOPE 
1924 012514 006737 901200 TST $PASS -TEST IF FIRST PASS OF PROGRAM 
1925 012520 901441 REQ h ;;BR IF FIRST PASS 
iSe6 912522 032777 O01000 166410 BIT #SWO9, ISWR -TEST IF INHIBIT VISUAL MAP PATTERNS 
1927 012530 001035 SNE T5157 :;BR IF tNHIBIT IS SET 
1928 912532 004737 017306 JSR PC, TESTID -DISPLAY MAP ® AND TEST # 
1925 012536 004737 016234 JSR PC, CLRMAP 
1930 O12542 904537 9517062 JSR RS. LODSTA sLOAD COLOR TABLE : 
133i 012546 990090 0 ?CO0C 0,1,2,3 AND S THRU 17 WITH O 
1332 012550 O16626 TABLE? :LOC 4’WITH A 17 
1934 12552 OOSO77 166704 CLR aVGPC sLOAD MAP P.C. TO 0 
1935 O12556 013700 001464 MOV VGBUF , RO :LOAD PIXEL ADDRESS 
1936 912562 013701 o01S54e MOV NUMPIX, Ri “LOAD # OF PIXELS 
1937 012568 105777 186666 1S: TSTB aVGCSR -WAIT FOR MAP READY 
1938 9012572 190375 BPL 1 
1939 912574 012710 oo0004 MOV #4, (RO) :LOAD BIT2 OF PIXELO 
1849 012600 905301 DEC R1 :FINISHED ALL PIXELO’S 
1941 O12602 001371 BNE 1$ :BR IF NOT 
1942 O12604 012777 ope4o0 1BssHs MOV sBIT1O!BITB, avGCSR ‘ENABLE THE MAP 
Be PEE Bee base fe pecteta ape eee 
a -s , 
is Dizbe2 500144 100. 
1347 5p RRERLERRLEA SLES EA EAE RAL ELE AEA RRR REAR EERE RE ALAA LE LELE ERLE SELES 
1942 : TEST S7 DYNAMIC WORD TESTING OF *PIXEL1’ (INCREMENT MAP P.C.) TEST L.U.T. 4 
19493 os SFSSRFLSSLEESRESS SHELLS RE SLAAAFAEALARAT AE SLAASAAERALLEAAERELALSZEE 
1850 012624 op00o4 té157: 
1851 Ole626 005737 oo1200 ST SPASS -TEST IF FIRST PASS OF PROGRAM 
1ae5 GtSess GSe77> polo0O 166276 Be EWBS. aSUR io FIRST FP TNHIBIT VISUAL NAP PATTERNS 
- rd ’ S H 
1964 Oleb4e par 056 BNE T5760 ::BR IF tnator? 13 ae 
1955 012644 004737 017306 JSR PC, TESTID :DISPLAY MAP # AND TEST # 
1956 012650 004737 016234 ISR PC; CLRMAP 
1957 012654 904537 617062 JER RS’LODSTA ;LOAD COLOR TABLE 
isf8 Ole660 opc000 :LOC 0,1,2,3 AND 5 THRU 17 WITH CO 
133 Clebse Olb626 TABLE? :LOC 4’WiTH A 17 
1961 012664 005077 166572 CLR avGPC :LOAD MAP P.C. TO 0 
19%2 012670 013700 OO1464 MOV VGBUF , RO :LOAD PIXEL ADDRESS 
1963 012674 013701 OO1s4e MOV NUMPIX, RL *LOAD # OF PIXELS 
1964 912700 105777 166554 1S: TSTB = aVGCSR :WAIT FOR MAP READY 
1965 012704 100375 BPL 1$ 
1966 012706 012710 oo0100 MOV #100, (RO) sLOAD BIT2 OF PIXEL 
i967 012712 301 DEC R1 :FINISHED ALL PIXEL1’S 
1968 9127149 901371 BNE 1$ :BR IF NOT 
1969 812716 912777 ooe4CO 166534 MOV #BIT10!BIT8, aVGCSR :ENABLE THE MAP 
1870 012724 004737 017554 JSR PC,LDLIN *LOAD REFERENCE LINE 
1871 12730 OO4537 O1bbEe ISR RS, DELAY 
ig? 012724 6800144 100. 
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BINDEC-11-D2vSE-A VSVO: VIEDO GRAPHIC TEST PROGRA MACYL1 27(1006) | O2-DEC-76 17:43 PAGE 46 
D2VSEA.F11  O2-JuN-7 00:50 T&0 DYNAMIC WORD TESTING OF *PIXEL2’ (INCREMENT MAP P.C.) TEST L.u.T. 4 

i374 5 FHRERALLAARELESRAEFERELSLAASLELELAELELALASELELLLERALEELRALFRELER 

1375  STEST 60 DYNAMIC WORD TESTING OF 'PIXEL2’ (INCREMENT MAP P.C.) TEST L.ULT. 4 

isvs © PERSSSSLSSESSASRELA SAREE RSLESSSERALEFERELARERERALELESELELALLESLESE 

187? 012736 000004 TSTEO: SCOPE 

1978 O12749 O0S737 901200 TST $PASS -TEST IF FIRST PASS OF PROGRAM 

1979 912744 Ooi 44 BEQ TST61 :;BR IF FIRST Pas 

1989 513746 777 001000 i6bié4 BIT sSW05, ISWR Test tr NHIBIT VISUAL MAP PATTERNS 

tas 5 Soee vated 017306 aon Pe SeSTID agate INWIBIT 35 SET AND TEST # 

weet é é ’ 

1983 512762 BRyoSs 016234 JSR PC’ CLRMAP 

1984 012766 004537 017062 JSR RS‘LODSTA LOAD COLOR TABLE 

1985 Ole772 o00000 0 1,@ 3 BND 3 THRU 17 WITH OC 

1338 512774 ol6626 TABLE? itBe a WITH 

1988 012776 005077 166460 CLR aVGPC sLOAD MAP P.C. TO 0 

1869 013002 013700 OO1464 MOV VGBUF , RO “LOAD PIXEL ADDRESS 

1880 913006 013701 oo1S4e MOV NUMPTX, RI ‘LOAD # OF PIXELS 

198: 913012 105777 166442 1$: TSTB © aVGCSR “WAIT FoR MAP READY 

1992 613016 100375 BPL 1$ 

1983 913020 012719 ooeoo0 MOV #2000, (RO) :LOAD BIT2 OF PIXEL2 

1994 013024 90530] DEC RI *FINISHED ALL PIXEL2’S 

3g pt 3558 poised i) 409 166422 a saIT O'BITS, aVGCSR zB FENG MAP 

4 H ’ v 

+333 pene s4 Baaegs a sie JSR Pe LOLIN *LOAD REFERENCE LINE 

1998 913042 904537 DiGbee JSR RS, DELAY 

1993 013046 900144 100. 

2001 + LLEKRAKERKREE EKER ERLE SRA L ERASE EEL ELE REALE ESSER RARE HELE ERELESEEEE 

2002 I RTEST 61 DYNAMIC WORD TESTING OF *PIXEL3° (INCREMENT MAP P.C.) TEST L.U.T. 4 

29003 = SEESKSLEFLERSEASESLALA KER SHEAR SEALE AE RELA LARA RELESRELALAFRELEKLSE 

Sone bt Shee Bossa? 901200 "Stel: FEgre ass -TEST IF EIRST PASS OF PROGRAM 

2096 012056 001441 BEQ STb2 :;BR IF FIRST PAS 

2007 913060 932 001900 1660Se2 BIT #SW09, aSWR TEST (F PNHIBIT VISUAL MAP PATTERNS 

2008 013065 901035 BNE T5762 ::BR IF tyHTB1T IS SET 

2509 O13070 094737 017306 ISR PC, TESTID sDISPLAY MAP # AND TEST s 

2010 913074 004737 016234 JSR PC; CLRMAP 

201i 013100 904537 617062 JSR RS; LODSTA ;LOAD COLOR TABLE 

2012 013104 909000 fe 1,2,3 AND S THRU 17 WITH O 

eo13 012106 Clb6e6 TABLE? itOG 4’ uETA A 1 

2015 912110 905077 166346 CLR aVGPC sLOAD MAP P.Cc. TO 0 

2O1E 913114 013700 O01464 MOV VGBUF , RO LORD PIXEL ADDRESS 

2017 013120 013701 oO1s4e MOV NUMPIX, RL OAD 8 PIXELS 

2018 013124 777 166230 1$: TSTB avGCSR Hat Pon MAP READY 

2918 913130 100375 BPL 1$ 

2020 013132 012710 o4c000 MOV #40000, (RO) ;LOAD BIT2 OF PIXEL3 

2021 013136 905301 DEC :FINISHED ALL PIXEL3°S 

20e2 013140 001371 BNE fe :BR IF NOT 

293 013142 012777 OOe4OO 166210 MOV sB1T108 BITB, aVGCSR :ENABLE THE M 

2024 O13150 004737 017554 JSR PC, LDLIN LOAD Fer ERENCE LINE 

2025 O13154 OO4S37 Clebte JSR RS; DELAY 

2026 O13160 900144 106. 
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IZVSER.P11 ODe-JUN-7E aa:5 ale Tée DYNAMIC WORD TESTING OF ’PIXELO’ (INCREMENT MAP P.C.) TEST L.u.T. if 
27 5 EEAAAAELEARASLEARELEAERELLALAL ELE RRELFLALAELLLLALASELELELEFRELEL 
202¢ I ETEST 62 DYNAMIC WORD TESTING OF *PIXELO’ (INCREMENT MAP P.C.) TEST L.ULT. it 
2323 = ERARSSRESSAARESAEAALAAASEAELELASAEAAESE EAA ELRRALAL FLA LFLELFKELEESS 
30 013162 oo0004 +éTe2: SCOPE 
5531 §13i64 OOS737 901200 TST SPASS - TEST IF FIRST PASS OF PROGRAM 
32 913170 o01441 BEG TSTE3 ::BR IF FIRST 
133 913172 032777 001000 168740 BIT #509, ISWR TF INHIBIT VISUAL MAP PATTERNS 
34 913200 001035 SNE T5763 ::BR IF instar! 15 SET 
2035 9132202 004737 017306 ISR PC, TESTID sDISPLAY MAP &® AND TEST # 
36 O13206 004737 216234 JSR PC’ CLRMAP 
2037 O13212 004537 9017062 JSR RSLODSTA ;LOAD COLOR TABLE 
2028 013216 900000 0 LOC 0.1,2.3,4,5,6,7 AND 11 THRU 17 WITH O 
2938 0i222e0 O16646 TABLES :LOC ib. WITH’ A’? ° 
2041 013222 005077 166234 CLR aVGPC sLOAD MAP P.c. TOO 
2042 013226 013700 601464 MOV VGBUF , RO ‘TOAD PIXEL ADDRESS 
O43 013232 013701 o01542 MOV NUMP IX, Rl :L 8D OF PIXELS 
2044 013236 105777 166216 1$: TSTB  aVGCSR WIT FOR MAP READY 
2045 013242 100 BPL 1$ 
2046 012244 012710 oo0010 MOV #10, (RO) :L08D BIT3 OF PIXELO 
2947 013250 00530 DEC Rl FIN ISHED ALL PIXELO’S 
2048 013252 001371 BNE tg NOT 
2049 013254 012777 ooe40D 186176 MOV SBITIO!BITE, avecsR tEN pe. E THE M 
2050 013262 004737 017554 JSR PC,LDLIN :LOAD SCE ERENCE LINE 
2051 013265 OO04S37 O1bbbE JSR RS; DELAY 
vee 013272 00144 100. 
eos es s LELRAESRHRLSLKLES ERASE RE LAAA ESE RARE KALE EKERARARALHRAL ELH RELA LAE ELE 
cs :kTEST 63 DYNAMIC WORD TESTING OF *PIXEL1’ (INCREMENT MAP P.C.) TEST L.U.T. IC 
2056 °C agg 2” gee crgimapecem tein. Sper tcio saan ne cat arena aati 
2957 013274 900004 +é763: SCOPE 
2058 013276 005737 901200 TST SPASS -TEST IF FIRST PASS OF PROGRAM 
2959 0123302 o0144: BEQ TST64 :;BR IF FIRST FA 
2060 913304 032777 OO1000 1eSb26 BIT #5W99, ISR TEST a INHIBIT VISUAL MAP PATTERNS 
2061 013312 901035 BNE TST64 ::BR IF iNHIBIT IS SET 
2062 013214 004737 0172306 ISR PC, TESTID sDISPLAY MAP & AND TEST # 
2063 913320 004737 016234 JSR PC’ CLRMAP 
2064 0133224 904537 617062 JSR RS;LODSTA ;LOAD COLOR TABLE 
2065 013330 o00000 0 "LOC 0,1.2,3,4,5,6,7 AND 11 THRU 17 WITH CO 
epee 013332 C1EE4E TABLES :LOC if wIth’a’l? 
2068 013234 905077 166122 CLR aVGPC ;LOAD MAP P.C. TO 0 
2069 013340 013700 O01464 MOV VGBUF , R ; LOAD PIXEL ADDRESS 
2070 013344 013701 sols4e MOV NUNPTi, R LOAD # OF PIXELS 
2071 0133250 105777 166104 1S: TSTB ss aVG WAIT FOR MAP READY 
013254 100375 BPL am 
2972 913356 012710 ood2o0 MOV #200, (RO) :LOAD BIT3 OF PIXEL 
2074 013362 005301 DEC RI :FINISHED ALL PIXEL1'S 
2075 013364 001371 BNE 1$ :BR IF NOT 
2076 013365 912777 O02400 166064 MOV sB1T10!B178, aVGCSR :ENABLE THE M 
77 913374 004737 9017554 JSR PC,LDLIN LOAD SEF ERENCE LINE 
2078 013400 O04S37 CIbEES JSR RS; DELAY 
2978 912404 00144 100. 
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| D2VSER.P1i = Oe-JuN-7& 00:06 TES DYNAMIC "WORD TESTING OF *PIXEL2’ (INCREMENT MAP P.C.) TEST L.u.T. ic 
20 ] eT Ea DYMAEIC LID TESTING OF °PLEL2” LINCRENENT fm 
2082 STEST 64 DYNAMIC WORD TESTING OF 'PIXEL2’ (INCREMENT MAP P.C.) TEST L.U.T. if 
2983 ae ee er eee 
013406 000904 jase 

208S 013410 O05737 901200 7c? SPASS -TEST IF FIRST PASS OF PROGRAM 
2086 012414 003441 , BEQ TST65 :;BR IF FIRST P Pass n 
20s? 13416 777? 901000 165514 BIT #5U03, aSHR TEST IF INHIBIT VISUAL MAP PATTERNS 
Be tine Gee gu a oe ee 

‘ (Sf 
Shea Btsdgs buss | Gt2395 128 a ERNAP 
2091 913436 904537 9517052 JSR RS, CODSTA ;LOAD COLOR TABLE 
209 913442 990000 0 "LOC 0,1,2,3,4,5,6,7 AND 11 THRU i? WITH O 
e035 013444 O16646 TABLES “Loc 10 WITH’A’1? ° 
2095 012446 166019 CLR avcrc sLOAD MAP_P.c. TOC 

O56 013452 013700 001464 MOV VGBUF *LOAD PIXEL ADDRESS 
2097 O1345E 013791 Go1s4e MOV NORP TX” R :LOAD # OF PIXELS 
2098 O13462 105777 165772 1$: TSTB  aVGCSR ‘WAIT FOR MAP READY 
2099 012466 100375 BPL 1 
2100 313470 012719 oo4ooo MOV #4000, (RO) :LOAD BIT3 OF PIXEL2 
2:91 013474 005301 DEC Rl sEINISHED ALL PIXEL2’S 
2102 013476 001371 BNE 1$ BR NOT 
2103 013500 912777 ooe4o0 165752 MOV #8IT10!BITB8, aVGCSR :EN BLE THE M 
2194 0135068 004727 917554 JSR PC,LDLIN LOAD EF CPERENCE LINE 
2105 913512 904537 O1ebee JSR RS; DELAY 
2106 213516 900144 100. 
2: 
2108 $ TEE EAE ERE R HE NAMTC WORD TESTING OF PIXEL?” CINCREMENT MAP P 
2:08 :4TE DYNAMIC WORD TESTING OF 'PIXEL3’ (INCREMENT MAP P.C.) TEST L.U.T. 10 
2110 gs rremritreiriece tiie enreriieseree citer ceins 
2ill 013S20 oo004 +éT65: SCOPE 
2lle O13522 005737 o01200 TST SPASS -TEST IF FIRST PASS OF PROGRAM 
21i3 9132526 001441 BEQ TSTbE ::BR IF FIRST PASS 
2114 913530 032777 cOl000 1Ee5402 BIT 8SW09, aSWR IF INHIBIT VISUAL MAP PATTERNS 
2115 012536 001035 BNE TSTB6 ::BR IF inert IS SET 
2116 013540 004737 017306 JSR pC, TESTID sDISPLAY MAP & AND TEST # 
2117 013544 004737 016234 JSR PC’ CLRMAP 
2118 013550 904537 617062 JSR RS’ |.ODSTA ; LOAD COLOR TABLE 
2119 013554 o00000 0 1,2,3,4,5,6,7 AND 11 THRU 17 WITH O 
ged 013556 O16646 TABLES ‘COC 10 WItH’A’1? * 

py ~4 
2iee 012560 165676 CLR avVGPC OAD MAP P.C. TOO 
2123 013564 013700 O01464 MOV VGBUF , RO :LOaD PIXEL ADDRESS 
2124 012570 013701 Oo1s42 MOV NUMPIX, R1 ‘LOAD # OF PIXELS 
2125 013574 105777 165660 1S: TSTB  aVGCSR : WAIT FoR MAP READY 
2126 013600 100375 BPL 1$ 

2127 013602 012710 100000 MOY #100000, (RO) ;LOAD BIT3 OF PIXEL3 _ 
2128 913606 90530) DEC :FINISHED ALL PIXEL3°S 
2123 013610 001371 BNE " -BR IF N NOT 
2130 O13612 912777 opeYoD E5640 MOY aB171010178, avGCSR ‘ENABLE THE M 
2i2l 913620 004737 9017554 JSR LDOLIN LOAD SEF ERENCE LINE 

2132 013624 004537 ClebEE JSR RE’ DELAY 

2123 013630 o00144 100. 


a 


hi 
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-A vSVO2 VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006) O2-DEC-7E 17:42 PAGE 49 
O2-sun-7 90:86 TEE DYNAMIC BYTE TESTING OF *PIXELO’ 
= FSLERSEASLRARESAARELERSEAALSLARAAAFLEREELSSLAAA LEAF LALELAFLELFSE 
ITEST 66 DYNAMIC BYTE TESTING OF ’PIXELO’ 

s SESSA SLESSARERELELELSFLERELAEE LAA LE RE LARARARERLEARALERSLAELEL ESE 
oooo04 tétes: SCOPE 
005727 901200 TST SPASS -TEST IF FIRST PASS OF PROGRAM 
092441 REQ TS767 ::BR IF FIRST Pass 
032777 901000 16S270 BIT #SWO9, JSWR EST IF INHIBIT VISUAL MAP PATTERNS 
001025 SNE TST67 :;8R IF inniBIt IS SET 
004737 017306 ISR PC, TESTID “DISPLAY MAP # AND TEST s 
004737 O16234 ISR PC’ CLRMAP 
004537 61706e JSR RS5,LODSTA sLOAD COLOR TABLE 


Biedee Opies in 0 AND | A 17 WITH 17 
005077 


1gSS64 CLR aVGPC “LOAD MAP P.C. TO O 
013700 301464 MOV VGBUF , RO ‘TOAD PIXEL Koonese 
013701 o01542 MOV NUMPTX, RI *LOAD # OF PIXELS 
105777 165546 18: TSTB aVGCSR : WAIT FOR MAP READY 
100375 SPL 1$ 
112710 90000: MOVB #1, (RO) :LOAD BITO OF PIXELO 
905301 DEC R} sEINISHED ALL PIXEL o's 
09137 BNE 1$ F NOT 
012777 o02400 165526 MOV #BIT10'BITS, aVGCSR SENABL — THE M 
004737 917554 ISR PC, LOLIN :LOAD FEF ERENCE LINE 
004537 S1gb56 JSR RS, DELAY 
900144 100. 
; LERASERERLLALERELLLLALE RELA LLLL LS RESELL LALA RE SEL LASSER RELL LES 
{STEST 67 DYNAMIC BYTE TESTING OF "PIXEL1 
es lh I aE oh Bt Ee 
ooooo4 t$167: SCOPE 
005737 001200 TST SPASS -TEST IF FIRST PASS OF PROGRAM 
091442 BEQ TST70 ;;PR IF FIRST PASS 
032777 O01000 165156 BIT #SW09, ISWR TEST IF INHIBIT VISUAL MAP PATTERNS 
091026 BNE  _TST70 ;;9R IF inHIBIT 1S SET 
004737 017306 ISR PC, TESTID sDISPLAY MAP & AND TEST # 
004737 016234 JSR PC; CLRMAP 
004537 017062 JSR RS; LODSTA ;LOAD COLOR TABLE 
ooo509 0 LOC O AND 2 THRU 17 WITH 17 
DIE4EE TABLE2 ‘LOC 1 WITH AY 
005077 16s4se2 CLR avGPC :LOAD MAP P. 4t0 0 
013700 OO1464 MOV YGBUF , RO : LOAD PIXEL ALDRESS 
005206 INC RO :MAKE PIXEL 1 BYTE ADDRESS 
013731 o01S4e MOV NUMPIX, Rl ‘LOAD # OF PIXELS 
105777 165432 1S: TSTB © aVvGCSR’ WAIT FOR MAP READY 
100375 BPL 1$ 
112710 00001 MOVB #1, (RO) ;LOAD BITO OF PIXEL 1 
095301 DEC RI sEINISHED ALL PIXEL i's 
001371 BNE 1$ NOT 
12777 o0e400 ies4ie MOV ab1rj0:8178, avVGCSR :BNABL E THE M 
904737 017554 JSR ¢,LOLIN : LOAD SEF ERENCE LINE 





004537 O1b666 JSR RE" DELAY 
000144 100. 
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Pl] Oe-suN-7& 00:29 170 DYNAMIC BYTE TESTING OF ’PIXEL2’ 
ifest 70 DYNAMIC BYTE TESTING OF PLEL2" 
T 70 DYNAMIC BYTE TESTING OF 'PIXELe2’ 
phan ls TOE soot Tne Rh a A MON PREECE ES 
014060 o00904 pistes SCOPE 
014062 005737 991200 TST $PASS “TEST IF FIRST PASS OF PROGRAM 
14066 001442 BEQ Ss TST71 ;;BR IF FIRST Fa : 
514070 032777 oo1p00 1ES042 BIT #5u03, aswR TEST fe INHIBIT VISUAL MAP PATTERNS 
014076 001036 SNE TS17 :;BR IF tNHIBIT IS SET 
914100 904737 017306 JSR PC, TESTID -DISPLAY MAP # AND TEST # 
634104 604737 16234 JSR PC’ CLRMAP 
914110 O04S37 017062 JSR RS‘LODSTA ;LOAD COLOR TABLE 
b1aii4 LOC O BND 2 2 THRU 17 WITH 17 
14116 OG16466 ABLE2 ?LOC 1 WITH 
914120 o0S077 165336 CLR aVGPC ; LOAD MAP P. he 
014124 013709 001464 MOV VGBUF , RO LOAD PIXEL L RODRESS 
014130 9057 TST (RO)+ MAKE PIXEL 2 BYTE ADDRESS 
014132 013701 oo1s42 MOV NUMPIX, R1 ‘LOAD # OF LS 
014136 105777 165316 18: TSTB  aVGCSR : WAIT FoR MAP READY 
014142 100375 BPL 1$ 
014144 112710 900001 MOVE 1, (RO) s000 BITO OF PIXEL 2 
014150 005301 DEC R1 FINISHED ALL PIXEL 2°S 
014152 00137! : BNE 1$ : BR NOT 
014154 012777 op2400 i6s276 MOV #BIT10!BITB, aVGCSR ‘ENABLE THE MA 
O14ibe 004737 017554 JSR PC,LDLIN ‘LOAD SEE ERENCE LINE 
O14166 004537 O16666 ISR RS’ DELAY 
014172 O00144 100. 
: «SEL KAESRHESASLESE LEAS RARSLAL AERA LE RLAERAARALARALAERASLEREAE FLERE 
; STEST 71 DYNAMIC BYTE TESTING OF 'PIXEL3’ 
= SELES HSRAKALRESRALALEREL SHLAA FRASER L RELA RAL AALAAERARARESHRLLERSEE 
014174 900004 771: SCOPE 
01417& 005737 001200 TST SPASS - TEST If FIRST PASS OF PROGRAM 
014202 O01446 BEG TST72 ::BR IF FIRST P 
014204 032777 OO1000 164726 BIT #SWO0S, aSWR TEST TF INHIBIT VISUAL MAP PATTERNS 
Ol4¥2l2 o01o%e BNE T5772 :;BR IF inter IS SET 
014214 004737 017306 ISR PC, TESTID :DISPLAY MAP # AND TEST 8 
014220 004737 016234 ISR PC’ CLRMAP 
014224 904537 9017062 JSR RS; LODSTA ;LOAD COLOR TABLE 
014230 oo0600 0 :LOC O AND 2. THRU 1? WITH 17 
014232 016466 TABLE2 LOC 1 WITH 
014234 005077 165222 CLR aVGPC ‘LOAD MAP P. e To 0 
014240 013700 001464 MOV VGBUF , RO :LOAD PIXEL ADDRESS 
014244 0962790 oo0003 ADD #3, RO *MAKE PIXEL 3 BYTE ADDRESS 
014250 013701 o01542 MOV NUMPIX, RL ‘LOAD # OF PIXELS 
014254 105777 165200 1S: TSTB aVGCSR :WAIT FoR MAP READY 
014260 100375 BPL 1$ 
014262 112710 oocoo MOVB #1, (RO) ;LOAD BITO OF PIXEL 3 
014266 005201 DEC RI :FINISHED ALL PIXEL 3°S 
014270 901374 BNE 1g :BR IF N NOT 
014272 912777 ope400 165160 MOV tB1T10!B178, aVGCSR sENABLE THE MAP 
014300 004737 017554 JSR PC,LDLIN :LOAD REFERENCE LINE 
014304 004537 Ol1b665 JSR RS; DELAY 
014310 o00144 100. 


Oi43le 042777 O10000 165126 BIC #BIT12,aVCCSR ;DISABLE REF. LINE 
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TEST THE ‘EXPAND’ FUNCTION 


5 ERREAERERRERRERLELELAL SREP RAL LRA ER EAE RE RRRRERL LEE LLL EL ERE LES 


 STEST 72 TEST THE "EXPAND’ FUNCTION 
ee ee ee 
TST $PASS -TEST IF FIRST PASS OF PROGRAM 
BEQ TS773 :;BR IF FIRST PA Pass 
BIT sS5W09, ISWR IF INHIBIT VISUAL MAP PATTERNS 
SNE T5173 :;BR IF inert 1S SET 
JSR PC, TESTID DISPLAY MAP # AND TEST # 
J5R PC’ CLRMAP 
MOV #17. JVGCOLR sLOAD MAX INTENSITY INTO LOCATION C 
MOV #8IT10'BITS8, aVGCSR :SET “MONO” AND ENABLE BIT MAP 
ISR RS, DELAY 
BIS #BIT11,aVGCSR ;SET THE "EXPAND’ BIT 
1SR RS, DELAY 


1 
ivct aa DRL A BOX LP ON VEY! SCREEN 


DRAW A BOX UP ON VYSVOi SCREEN 


sazverbefbesbnneebeseesassoenseetavannsesenennnasessentns 


+é SCOP 
TST SPAS -TEST IF FIRST PASS OF PROGRAM 
BEQ TST74 ::BR IF FIRST FA 
BIT #5W09, ISWR TEST fe INHIBIT VISUAL MAP PATTERNS 
BNE TST74 ::;BR IF NHIBIT IS SET 
ISR PC, TESTID “DISPLAY MAP # AND TEST & 
CLR “SET UP gr MAP ADRS - 10° LINE 
MOV #73567,R1 :SET UP PIXEL DATA IN R1 - INT 7 
JSR PC, DISPY :GO LOAD BIT MAP 
1S: INC RO ‘ADVANCE BIT MAP ADRS 
CMP #40,RO TOP LINE DONE? 
BEQ -BR IF SO 
JSR PC, DCONT : LOAD NEXT PIXEL 
BR 1$ NEXT 
2$: MOV #7740, RO :SET ry BIT MAP ADRS - BOTTOM LINE 
JSR PC, DISPY :GO LOAD BIT MAP 
2g: INC ADVANCE ADRS 
CMP #10000, RO ;BOTTOM LINE DONE? 
BEG 4 ‘BR IF 
JSR PC, DCONT ‘LOAD NEXT PIXEL WORD 
BR !NEXT MAP LOAD 
4g: MOV a0 RO :SET UP BIT MAP ADRS SIDE LINES 
cs: MOV :SET UP PIXEL 0 DATA IN R1 - INT 7 
ISR Be’ BISPY :GO LOAD BI MAPO 
MOV #70000,R1 -SET UP PIXEL 3 DATA IN Ri - INT 7 
ADD #37,R0° ; OFFSET TO RIGHT SIDE LINE 
JSR pc, DISPY :GO LOAD BI 
INC -GO TO NEXT ROW ON LEFT 
CMP #7740, RO ;T0 BOTTOM YET? 
BNE S$ :BR IF N 
CLR "LOAD L.U.T. O 
MOV GCOLR “LOAD L.U.T. ? 
sNOW DISPLAY Nonfat ete 
MOV ag1T10% are, avVGCSR sENABLE M 
RS. DELA : DELAY FOR * OPERATOR 
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MAINDEC-11-DZVSE-A vSVOi VIEDO nes TEST PROGRAM MACYL1 27(1906) O2-DEC-7&6 17:43 PAGE Sz 
| OZVSEA.P11 D2-JUN-7& 00:00 173 DRAW A BOX UP ON VSVO1 SCREEN 
|  ppge . secy iNOW DISPLAY EXPANDED SIZE BOX 
2297 O14S7E OSe777 CO4O00 164654 IS #B8IT11,aVGCSR ;EXPAND MAP 
2298 O14604 CO4S27 OlSéSé JSR RE DELAY : DELAY FOR OPERATOR 
2299 014610 000144 100. 
2300 yp RRKKA RARE RRR ARE RARE E RARER EERE EEL EERE EERE E REESE 
2301 TEST 74 TEST THE *ORIGIN’ FUNCTION 
2202 + + REREKARREEERERA KEELES ERLE ELSE SLEEK ELE EERE SELLE EEE LE RAL ER ELLE REESE 
| 8303 o14ei2 oo0004 +8174: SCOPE 
2304 914614 905737 001200 TST $PASS : TEST . FIRST PASS OF PROGRAM 
2305 014620 001434 BEQ TST75 :;BR IF FIRST P 
23068 Ol4be2 032777 O01000 164310 BIT #SWO9, ISWR TEST INHIBIT VISUAL MAP PATTERNS 
2307 014630 001030 BNE TST7S ;;BR IF iNHISIT IS SET 
| 2308 014632 004737 017306 JSR PC, TESTID :DISP LAY MAP # AND TEST # 
| 2309 O14636 004737 016234 JSR PC, CLRMAP : CLEAR THE MAP 
' 2310 O14642 012777 OO00017 164616 MOV #1? JVGCOLR : LOAD MAX INTENSITY INTO TASLE LOC. O 
| 2211 O14650 012777 OOe400 164602 MOV #81t10'BITB, aVGCSR * ENABLE THE BIT MA 
23l2 014656 005037 001474 CLR $T 
2313 Ol4662 113777 001474 164570 18: MOVB $TEMP, JVGCSR ;LOAD ORIGIN REGISTER 
2314 014670 004537 O16666 JSR RS, DELAY 
2315 O14674 000144 100. 
2318 O14676 105237 001474 INCB STEMP ;UPDATE THE ORIGIN POSITION 
2317 O14702 122737 O00020 OO1474 CMPB #20, STEMP : TEST ‘. A NON-VALID ORIGIN 
sais 14716 001364 BNE 1$ ‘BR IF A VALID ORIGIN 
i 
2 agg iy or ag eo annem 
i eg3el T 7S INTENSITY LEVEL TEST-MONOCROME 
i g3ee jeeseediesaaanstannaeanesieataneaeeseaeseeaRRaeaEaeEaHEaEOES 
| 9323 614712 oD0004 fits SCOPE 
| 2324 014714 005737 001200 TST $PASS TEST IF FIRST PASS OF PROGRAM 
| 2325 O147e0 001435 BEQ TST76 ;;B8R IF FIRST Pass 
| @326 O14722 032777 001000 164210 BIT #SWO9, JSWR IF INHIBIT VISUAL MAP PATTERNS 
2327 014730 001031 BNE TST76 ;;BR IF inngBrt IS SET 
| 2328 014732 004737 017306 JSR PC, TESTID ;DISPLAY MAP # AND TEST # 
2229 014736 004737 016234 JSR PC, CLRMAP ; CLEAR on BIT MAP 
2330 O14742 pone a2 016774 JSR Pc; LODSEQ sLOAD T WORDS. PER LOOK TABLE LOCATION 
2331 014746 S037 014764 CLR 2s" i CCEAR Ho ART TN INTENSITY LEVEL 
2332 O147S2 012777 OO64OO0 164500 MOV #BIT11! Srriorerre, avGcsR’ SET MONOCROME + ENABLE MAP 
| 2333 014760 O04S37 9017062 1$: JSR RS, LODSTA ;LOAD SEQUENCE 
| 2334 014764 o00000 es: 0 : INDEX INTO DATA VALVE TABLE 
, e@3 O14766 016446 TABLE] 
| #336 014770 004537 O16666 JSR RS, DELAY 
2337 014774 900144 100. 
| 2338 014776 062737 000001 014764 ADD #1,2$ ;UPDATE INDEX INTO TABLE FOR LOCATION O°S VALUE 
2239 O15004 022737 Oo09020 914764 CMP #20, es : TEST IF LAST VLUE FOR MONOCRO ME 
2240 O15012 O0136e BNE :8R IF MORE LEVELS FOR LOCATION 9 


MAINDEC-11-DZ2VSE-A VSVOiL VIEDO wont’ TEST PROGRAM MACY11 27(1006) O2-DEC-76 17:43 PAGE 53 





OZVSEA.P11  O2-JUN-76 00:00 T76 TEST THE GREEN BITS 
| 234 5% SHAKERS ALAARKAA KSLA LASS RESALES SEL AASLELFL LHL RAR ALA FELLA LAF ERARSERELAESE 
234 TEST 76 TEST THE GREEN BITS 
2343 © = FLAKE KELESEKERERES RAKE SERRA LASS EKLAL FLARE LALA LALA FLA LSA KSA KELEREEE 
015014 oo9004 6: SCOPE 
| 9345 015016 005727 oo1200 TST SPAss - TEST IF FIRST PASS OF PROGRAM 
23 015022 001435 BEQ TS77 :;BR IF FIRST P 
2347 815024 032777 OO1000 164106 BIT $1109, aSWR TEST fee INHIBIT VISUAL MAP PATTERNS 
2348 015032 001031 BNE 15177, :;BR IF inAierT IS SET 
2349 915034 004737 017306 ISR PC, TESTIO ;DISPLAY MAP # AND TEST # 
2250 015040 004737 016234 JSR PC’ CLRMAP :CLEQR THE MAP 
2351 O15044 012777 OO44D0 164406 MOV wetsii? B1T8, aVGCSR ‘ENABLE MAP AND EXPAND 
2252 015052 012777 OO0004 164406 MOV #4, AVGCOLR “LOAD TABLE POINTERO - LOW GREEN LEVEL 
2353 O15060 604537 O16666 JSR RS; DELAY 
2354 015064 900144 100. 
355 015066 012777 o00010 164372 MOV #10, IVGCOLR ;SET THE MEDIUM GREEN LEVEL 
2256 015074 004537 O1G666 JSR RS, DELAY 
2357 015100 o00144 100. 
2358 015102 012777 OO0014 164356 MOV #14, JVGCOLR ;SET THE BRIGHTEST BREEN LEVEL 
2359 015110 904537 O166b6 JSR RS, DELAY 
2360 015114 000144 100. 
2362 5s © RHA AE KAKA RAL ALE LEA KAA LALA LEAKE KAR EAA LALA AA LE RAL RAE LALLA REE 
2363 :&TEST 77 TEST THE RED BIT 
2364 eg ne 
2365 915116 ooco04 +6177: SCOPE 
2266 015120 005737 oo1200 TST SPASS -TEST IF FIRST PASS OF PROGRAM 
| 2367 015124 001435 BEQ TST100 :;BR IF FIRST PA 
2268 015126 032777 o01000 164004 BIT #S5W09, ISWR re INHIBIT VISUAL MAP PATTERNS 
' 6363 015134 001031 BNE TST100 ::BR IF indiert IS SET 
2370 015136 004737 017306 JSR PC, TESTIO sDISPLAY MAP # AND TEST # 
2271 015142 004737 016234 JSR PC’ CLRMAP 
2372 015146 012777 OO4400 164304 MOV eettii? gIT8, avGCSR sENABLE MAP AND EXPAND 
| 2373 O15154 012777 OO0001 164304 MOV aVGCOLR :SET THE DIMMEST RED LEVEL 
| pa74 915162 004537 Ois6e6é ISR RS" DELAY 
| 2375 O15166 900144 100. 
| p376 015170 012777 oD0002 164270 MOY #2, IVGCOLR :SET THE MEDIUM RED LEVEL 
2377 015176 004537 O16666 JSR RS, DELAY 
2278 015202 900144 100. 
2279 015204 012777 ooD003 164254 MOV #3, JVGCOLR ;SET THE BRIGHTEST RED LEVEL 
2280 O1S2i2 004537 O1EbE6 JSR RS; DELAY 
015216 000144 100. 


eee cee — 
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PaGE S4 


| 
| 
| 
j 
‘ 
| 
2295 - PePESESSEESSELSESESSSSSPSFPSSSPSSESESESESEESESSSLSESES ESSE SESE SES 
! 
| 
} 
| 





£283 se PSSERSSSAASSFSSSSSSASESSHSSSSSLSSESSSESFFSELSLELESSSLSSEASSSS ASS 
ese :STEST 100 TEST THE BLUE COLOR SITS AT TABLE ADORESS 0 
238 015220 00004 ‘atthe SCOPE 
2387 15222 905737 901200 TST SPASS TEST IF FIRST PASS OF PROGRAM 
2388 015226 003435 : BEG TST101 :;8R IF FIRST & Pass 
2289 515230 O32777 001000 162702 BIT 85S, aSwR TEST IF INHIBIT VISUAL MAP PATTERNS 
2390 615236 901031 SNE Ts710} ;:BR IF inHiBIT 1S Set 
2391 315240 OO04737 017306 ISR PC, TESTID ;DISPLAY MAP @ AND TEST 8 
2292 O:5544 004737 916234 JSR CLRMAP 
2233 015250 12777 OONDO 1s42de MOV esti! B17, VGCSR ;ENABLE MAP AND EXPAND 
| 2354 015256 Glev77 000020 164202 MOV 820, 3 GCOLR SET THE DIMMEST BLUE LEVEL 
| 2395 O15264 G04537 ClES56 JSR 5, DELAY 
| #2396 018270 000144 190. 
| 2297 O15e72 O1e777 DO0040 lesiée MOV 840, 2VGCOLR ;SET THE MEDIUM BLUE LEVEL 
| £398 15300 004537 16666 xg RS, DELAY 
| 2383 O15304 od0144 100. 
, e802 915306 Q1e777 oo00EO 164152 MOV #60, avSCOLF ;SET THE BRIGHTEST SLUE LEVEL 
| £852 915314 08537 SIgeEs ySR RS, DELAY ' 
| S452 O28320 550144 100 


MRINDEC -12-DIVSE=5 WSVO2 VIEDO sata‘! | TEST _PROGRAY ay 100%) O2-DEC-7E 17:43 PAGE SS 
‘SES.F ii Ue-JUN="6 92:00 7160 TEST THE BLUE COLOR “Bits A T TABLE ADDRESS 0 
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SSTEST 101 COLOR LEVEL TEST - COLORCROME 

i = SFSSSSSSSRELSSFSSSREASSLESSSSSSSSSEREESSSSERSSARESERERAFLFLERELS 
S322 990004 biti01: SCOPE 
S304 005737 901206 ST $PASS TEST IF FIRST PASS OF PROGRAM 
$330 901441 BEQ =: T$T10e ::8R IF FIRST Pass 
5332 77? «C0000 163600 BT7 sSWO9, aSWR -TEST IF INHIBIT VISUAL MAP PATTERNS 
5349 00!035 BNE TST102 ::BR IF INHIBIT IS SET 
5345 OON737 917306 ISR PC, TESTID “DISPLAY MAP & AND TEST 
S346 004737 «516234 35k PC’ CLRMAF :ENSURE CLEAR . 
S352 004737 O16774 SR PC’ LODSEO "LOAD TWO WORDS PER LOOKUP TASLE LOC. 
s35£ 905037 915372 tLR 25 tee AR INDEX POINTER 
S362 005077 164072 CLR avSCSR ; CLEAR STATU 
P66 517262 18: TSR RS, LODSTA :LOAD DATA TRTO TABLE 

é &3: w 
5374 O1eS4 TABLES : 
376 012777 184054 MOV sSIT11'BITS, avGCSR sENABLE MAP 
544 7 OSi66&6 ISR RS, DELAY 
S410 300144 100. 
S412 062737 900001 015272 ADD 81,23 sUPDATE LOC 0 INDEX INTO TASLE 
S420 Oee737 900020 S18372 CMP a0, 2g ; TEST IF FINISHED FOR LOC 
S426 001357 BNE 
£430 OOS577 1e4024 CLR SYSCSR ‘ DISABLE MAP 
j SEEEHESSELELAFRELLAAAELARELERALELAEA RELL LALA ALAL ELLE FLELAER ALES 
I$TEST 102 LOGICAL END OF BIT MAP TEST 
= SESSSLELSSSFSSSEFARARLSSSSESKRELSEFESESESLAL SRE TELLER ESEREFAESERTE 
S1424 900004 térin3: SCOPE 

Eu3e 500557 port IMP MAPRET ;RETURN AND TEST IF MORE MAPS 


- SBTTL 
atte OPERATOR INTERVENTION AND INSPECTION TESTS 





















| MBINDEC-11-D2VSE-A8 VSVCL VIEDC GRAPHIC TEST PROGRAM MACYI1 27( 1006) 
asigeaeit ~~ Se-cunere 3E:EE CROSS HATCH TEST PATTERN 
a3 .SBTTL CROSS HATCH TEST PATTERN 
e440 O1S442 O1E7OE 901190 HATCH: MOV BSTACK SP OAD SP 
e441 O15446 OO4737 90357 x5 LODADR :LOAD BUS ADDRESSES FOR MAP s: 
ae4e 015452 904737 915510 JSR Pe Hate HG LOA 80 
P4435 O15456 012777 OO4400 163774 MOV eBiT11'BITS, avGCsR TENABLE MAP EXPAND AND ORGIN =0 
E444 O154—E4 004737 003720 z5R PC cs NOVADR :ADIUST BUS ADDRESSES TO MEP si 
e445 015470 OO4737 015510 TSR HATCHO :LORD MAP #1 
esse D1SN74Y Ole777 OO4402 16375s MOV eetTiifarrerert: avecse | ENABLE MAP, EXPAND AND ORIGIN =2 
eey> 015502 900000 
ag O15504 000137 901872 IMP BEGIN 
ete SACTURL LOADING OF CROSS HATCH INTO BIT MAP SUB-ROUTINE 
e452 015510 004737 216234 HATCH: JSR PC, CLRMAP ENSURE CLEAR MAP 
e453 915514 12737 oO0022 015636 MOV 22, 10S :LOAD VERT. COUNTER 
e454 015522 163734 CLR SvGPC :CLEAR MAP P.C. 
e4é5 015526 012701 90040 1$: MOV ;LOAD WIDTH COUNTER 
e456 015532 105777 163722 23: TSTB sveceR :TEST IF MAP READY SET 
2457 015536 100375 BPL 2$ :BR IF NOT READY 
2458 O15540 012777 177777 163716 MOV 8-1, aVGBUF ;LOAD #17 INTO ALL PIXELS 
2459 015546 005301 DEC Rl 
B460 015550 901375 BNE 28 ;BR UNTIL FINISHED 
2461 O15552 012737 ooo140 o1se40 MOV #140, 118 LOAD VERT COUN 
e462 O15560 105777 1&3674 38: TSTa 3 avGc$ ‘SECT TF MAB READY IS SET 
2463 15564 100375 BPL 3$ BR IF NOT 
2464 O15566 012777 o00017 162672 MOV #17, aVGBUF ;LOAD VERT LINE PIXEL 
a4es 015574 105777 163660 4g: TST8 © avG¢SR :TEST IF READY 
246 015600 100375 BPL 4g :WAIT IF NOT 
2467 015602 OOS077 162656 CLR aVGBUF :CLEAR PIXELS 
Buc6 O:5606 905337 o1S5640 DEC 118 en ETE 
ea OiS6l12 001362 SNE 3$ :BR UNTIL FUNISHED SEVERAL ROWS OF PIXELS 
2472 O15614 005337 C1s636 DEC 10$ ;TEST_IF FINISHED THE SCREEN 
e473 Oi5ee0 O0134e BNE i$ BR IF NOT 
be | 
e475 O15t22 905077 163640 CLR aVGCOLR ;CLEAR 9 
e476 O15626 012777 OO7477 163622 MOV 87477, AVGCOLR :LOAD bitte INTO L.U.T. a7 
e477 S15E34 000207 RT PC :EXIT 
4 
2478 O15636 900000 10$: 
2480 615645 000000 118: 0 
e4F= .SBTTL SWR CONTROL OF X AND Y CROSS HAIRS LOOP 
E482 O1SE¥2 12706 001100 CROSS: MOV acTACK SP ;LORD STACK 
2484 O15€46 004737 002576 JSR ODADR LOAD DEVICE RODRESS 
e425 OSeS2 012777 O14D00 1e2s66 MOV aetTie¢BITL1, aVCCSR TENABLE ¢ CROSS HAIRS 
e486 S1S6E0 194407 1S: CKSWR TEST FOR CTRL G 
e427 Si5e6e 017777 162252 1635¢0 MOV ASR, IVCHRLO 1.98 THE ROSS” HAIR POSITION REGISTERS 
exe SiEE7S 000773 ze ig : LOOP 
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MACY11 27(1006) 





C2-DEC-7E 


Ray Sptene 
BETTE MISC SUBROUTINES 
.SBTTL SUBROUTINE TQ TEST THAT ‘VERT SYNC’ BIT CHANGES, REPORT ERROR IF 
“BIT DOES NOT , CHANGE STATES (0 TO 1 OR 1 TO O) 
ZOUNTA: INC CNTSAV ;SET Exit "ERs 
MOV sBITL4, Re LOAD BIT 14 
cLR ;CLEAR COUNT 
MOV iecsr RO ‘LOAD BUS AD 
BIT , RO) ;TEST IF BIT IS SET 
BEG a’ ‘BR IF SET 
igo OME HERE IF BIT. 14 WAS INITIALLY SET - “NO ieee FOR IT TO CLEAR 
e 1 
NE 2 :BR IF NOT OVERFLOW 
ERROR 5. :VERTICAL SYNC FLAG ERROR 
28: BIT RE, (RO) :TEST IF BIT 14 IS CLEARED 
BNE 1$ iBR if STILL SET 


CLR cNTSAV 
ig? l 

BNE 4§ 

ERROR 5 

RTS Pc 
4§: BIT R2, (RO) 

BEd 3$ 

ST SNTSAV 

BNE COUNT 

CLR ENTSAV 

RTS PC 
CNTSAY: OD 
DISPY: BIC #409, IVGCSR 

MOV 0. aVvGPC 
DCONT: BIC #400, aVGCSR 
ig: TSTB  aVGCSR 

BPL 1$ 


MOV Rl, aVGBUF 
#450, BvGCSR 





CLEAR Exit FLAG 


x 
OME HERE IF BIT 14 WAS INITIALLY cured = Ae FOR IT TO SET 


R_ IF NOT OVERFLOW 
egies SYNC FLAG ERROR 


s test IF BIT 214 IS SET 
R_IF CLEARED 
{TEST A FLAG IS SET 


: CLEAR AGAIN 
sEXIT 


i DISABLE MAP 

;LOAD MAF and C. 
:DISABLE M 

:TEST IF NAP IS READY 


;LOAD A PIXEL 
sENAGLE M&P 
2EXI 




























FOS 





; MAINDEC- il -DIVSE-8 


VSVOi VIEDC GRAPHIC TEST PROGRAM MACYL1 27:1006) O2-DEC-76 17:42 SAGE se 

DIVSEAR.P11  O2-JuN-7E 00:00 DISPLAY BUFFER ON VTVOL SCREEN Eig: ROUTINE 

2531 .S8T7L DISPLAY BUFFER ON VTVOl SCREEN SUB-ROUTINE 
2533 018032 Cl2700 924320 XPRNT: MOV SBUFFER RC sLOAD BUFFER ECINTER 
2534 16036 o09240 XPRNTA: NOP 

2535 O16940 oode46 NOP 

2536 016042 a NOP . 
2537 O18044 O0S777 163376 1g: TST avecsr :TEST IF READY IS SET 
2538 O160S0 190375 PL 1$ . sue IT TILL DONE 

2529 916052 112077 162370 MOVE (RO)*, aVCCSR OAD THE CHARACTER 
2549 16056 122710 900377 CMPS) sg 377, (RO) Tes] FOR T 

2541 916062 901379 BNE 1g & IF NOT SEEM. 

2542 O16064 4 NOP 
2543 018066 900240 NOP 
2544 916070 oode40 NOP 

2s45 O1607e 000240 NOP 

eeu 916074 969207 RT PC sEXIT 

SS f 
2548 O16076 012701 901500 FILiWC: MOV KE,R1 :LOAD BASIC CHARACTER 
2549 Ol610e 004737 d1613= ISR PC’ FILBUF "LOAD BUFFER WITH THE CHARATTES 
2550 O16198 913737 001524 0:8:20 MOV VH0, 19 LOAD VERTICAL COUNTER 
2551 O18114 904737 Qicd32 18: JSR PC, XPRNT :DISPL AY ALINE 
2552 Oléiec 005337 916:35 DEC 10¢ TSTEHED at VERT LINES ” 
2553 016124 100373 BPL 1$ BR IF NOT 

2554 O18126 900207 RTS PC EXIT 

556 016130 900000 10S: 
2557 O16132 O13702 ofise2 FILBUF: MOV WIDTH, Re sLCAD WIDTH VALUE 
Seg Dlelae jipieo S$: OVS aeureER, ro IT Ue E CHARACTER IN THE SUFFER 
J - i. : . t + . 
Baa state 460 DEC fb: iNT on 
2561 O18146 901375 BNE 1$ : BRANCH TF NOT COMPLETED 
2562 016150 112720 op0015 MOVB #15, (RO)+ :LOAD “CR” 

2562 O16154 1128789 O00075 MOVE lz. (RO)+ LOAD “LF” 

2564 O16160 112710 000377 MOYB 8377, (RO) ; LOAD Tehn 

g365 O1g184 909207 RTS PC EXIT 

2567 :LOAD A INCREMENTING CHARACTER ACROSS THE SCREEN WIDTH 

gee -ONLY 40 THRU 177 ARE LEGAL CHARACTERS 

2570 Olb1G6 O1l2700 024330 LIC: MOV #BUFFER,RO : SET-UP BUFFER POINTER 

2571 O16172 013502 MOV a(5)+, Re SET-UP WIDTH 

2572 O16i174 110120 1S: MOVB 1, (03+ ; SVE A CHARACTER IN THE BUFFER 
2573 O16176 00520] INC Rl :UPDATE THE CHARACTER 

2574 O16290 023701 oD1S32 C LASTCH,RI : TEST FOR 

c75 916204 O00 BNE : BRANCH IF NOT 

S7— 016206 012701 ooop40 MOV #40,R1 AKE A LEGAL CHARACTER 

2577 Olgele o0S302 2s: DEC R2 ‘OECREMENT COUNT 

2578 Ol6e14 901367 BNE 1$ ;BRANCH IF NOT COMPLETED 

2573 Olsei6 112720 o00015 MOVB 415, RO)+ :LOAD "CR" 

2560 S16222 112720 o900i2 MOVE 12. (RO)¢+ :LOAD “LF” 

2581 Oleecé 112710 900377 MOVB 877, (RO) :LOAD TERM 

Clbzz2 onde05 RTS RE ;EXIT 
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GRAPHIC TEST PROGRAM MACY11 27(1006) QOe-DEC-7E 17:43 PGE SS 
DISPLAY BUFFER CN VTVO1 SCREEN SUB-ROUTINE 


;SUBROUTINE TO CLEAR THE BIT MAP 






URN 
PRESS 





2609 


eat tattad aad cadaltak tata unt 
.000 NP Ul Gotu 2 


6 TU 0-+ 0 0 b- «= 6 & <0 -) bo Be 


OOodood0O00NU 
Serereerverveaeers i 


909100 : MOV sBIT&, 108 #080 BASE DELAY 
18320 os: z :CLEAR COUNTER 
TEEEE ISR DELAY 
BITIS!1 
NOP 
024 NOP 
090240 NOP 
Gl2777 001000 163170 MOV #BITS,avGCSR :SET "CLEAR MAP’ SIT 
105777 163164 1s: TSTB avGcse : TEST READY FLAG 
100497 BMI 23 :BR IF READY SET 
095237 016220 INC iis ;UPDATE COUNTER 
:37 s BNE 1$ BR IF NO OVERFLOW _ 
01621 DEC 10 -DECREMENT BESE DELAY 
BNE i$ “BR IF NO OV Wi  Chacctegs 
ERR is :MAP READY FAILED TO SET AFTER 4 GROSS 
: TIME DELAY 
RT PC EXIT 
0 :BASE DELA 
5 : COUNT ESCATION 
CROSS HAIRS WITH 2 BIT MAPS ENABLED 
901100 1: MOV z ‘ 
053576 JSR sLOAD DEVICE ADDRESS 
016234 JSR 
009014 MOV ;LOAD LUT TO GREEN 
04 MOV ‘ENABLE T 
003730 JSR :UPDATE TO NEXT MAP ADDRESS 
916234 ISR 
600014 MOV sLOAD LUT TO GREEN 
os4o4 MOV eld ae ‘etter, QVGCSR =; ENABME MAP - EXPAND - ORIGIN 4 
914009 MOY :ENGBLE CROSS HAIRS 
CKSWR :TEST FOR CTRL G 
162526 Mov LOAD eROSS NAIR OGIGIN 
BUR TIME-OUT LOOP 
001190 iT: MOV sLOAD $ 
O1E44O MOV LOAD Bus TRAP RETURN 
lb2ble St "REFERENCE THE ADDRESS 
NOP 
chp sCLEAN THE STACK 





MGINDEC-11-D2vSE-8 vSVOi 
DIVSER.Pii  O2-Jun-7¢ 00:04 
2633 cee = 000—(itié 
cea4 Cigws: 363 904 
635 016454 50 d07 
2635 16457 298112 
E37 Olevee =H SSC 
638 O1e4es = 917 a 
seas Dié4ee «= 00s 
640 016471 800 060 
B41 O1E¥74 «=—s«s00—(iéiD 
B42 016477 000s‘ 
B43 016502 656 000 
Be44 O1E505 = 00 
2E45 O1E50E = «o014 sk 
Be¥E 01651: 063 263 
2e47 016514 O63 63 
Be48 O16517 9 oEStsCO 
“48 «015522 «= 063s« 
ees0 016505 063 3 
2651 O1650 504 or 
B52 01653: 004 004 
2653 016534 O04 O04 
2654 016537 004 O04 
Bess O1g542 4896004 SG 
e656 O1654S = 004 
PEs? O16546 90: one 
e658 916551 904 O16 
ess9 016554 20 O40 
2660 916557 063 O74 
2661 O1E562 033 O25 
e562 O1ese5 9077 
ec62 Cisse 501 one 
2664 615571 O04 O10 
Bess 01e574 4 8=feo)~=— 
BEE 916577 «e374 
2667 O16602 033 O25 
2668 O1660S 077 
2669 Neb O00 900 
2670 O1661i 609 900 
2671 916514 009 O00 
2672 O1ESiI7 000 O00 
2673 Olbe2e 090 000 
2674 Ol6625 900 
2675 Olb626 090 900 
2676 O16631 099 9Ji7 
2677 O16634 900 960 
2672 016627 900 990 
2678 O1ee42 009 G00 
e620 O1ee4s O00 
2681 SI6E4 000 900 
eee ists] 000 000 
eee3 O166s4 000 O00 
eee4 016667 900 909 
Zees Slebbe  o00 900 
2e8e Olsees 000 
2687 


uw? 
va 


Do GRAPHIC TEST PROGRAM MACY11 27(1006) Oe-DEC-7& 17:43 PAGE &C 


BUR TIME-OLT LOOP 


ONO O00O00° 
OO +-e->-(009 
Ono Mwhire 


TRBLEL: 


TRELES: 


TABLES: 


TABLES: 


TABLES: 


TASLE?: 


TABLES: 


BYTE 9,1.2,3,4,5,6.7. 10,11, 12,13, 14,15, 16,17 

: .BYTE 0,17,0,0,0,0,0,0,0,9,0,0,0,0,0,0 sL.U.(.1 8 
BYTE 14,63,63,63,63,63,53,63,63,63,63,63,63,63,63,63 
BYTE 4%,17,4%,4,4,4,4,4,4,4,4,4,4,4%,4,4% 
-BYTE 1,2.3,4,10,14,20,40,60,63,74,17,33,25,S2,77 


BYTE 1,2,3,4,10,14,20,40,60,63,74,17,33,25,52,77 


BYTE 0O,0,17,0,0,0,0,0,0,0,0,0,0,9,0,0 3L.U.7. 2217 OTHERS = 0 
BYTE 9,0,0,0,17,0,0,0,0,9,0,0,0,0,0,0 3L.U.7. 42 17 OTHERS = 0 
BYTE 0,0,0,9,0,0,0,0,17,0,0,0,9,9,0,9 


. EVEN 


a ee nee ee 


HOS 


































105 


| MRINDEC-11-D2VSE-8 VSVO: VIEDC GRAPHIC TEST PROGRAM MACY11 27( 1006) O2-DEC-76 17:42 PAGE él 

D2VSER.P11 O2-Jun-7e 00:09 BUR TIME-OL'T LOOP 

2ege 

oe8 .SBTTL DELAY SUBROUTINE -- WAIT FOR “VERTICAL SYNC INTERRUPT” 

2691 OGEEE O12777 OLET7E 182574 DELAY: MOV #53, IVCIN sLOAD INTR. RETURN ADDRESS 
PE92 O16674 Olev7? B0e0o lses70 MOV aRPATOR, aVCINT! :LOAD RETURN PRIORITY 

2693 O16702 912537 016770 MOV (R5)+, 108 “GET THE ARG. 

eo3 018756 109003 BPL Et ‘BR IF POSITIVE 

2696 OlE7IO OOST37 CLE77 18: TST 10 ;TEST IF DELAY CANNOT BE INHIBITED 
2697 O16714 100404 BMI 3$ CANT 

2698 O18716 932777 O10000 162214 2S: BIT #81712, 3SWR {TEST IF INHIBIT DELAY SWITCH IS SET 
2539S 016724 001013 BNE 43 :BR IF INHIBIT IS SET 

2700 Oi&726 OS2777 oe0000 162512 3s: BIS #BIT13,aVCCSR ‘ENABLE SYNC INTR. 

2751 16734 009001 WAIT :WAIT FOR INTERRUPT TO HAPPEN 
2752 O16736 O42777 O20000 162502 BIC #BIT13,aVCCSR -DISABLE INTR. 

2703 OiE744 104407 CKSUR ;TEST FOR CTRL G 

274 Ol6746 105337 916770 DECBSs«d1OS FINISHED DELAY ” 

2705 O16 001356 ONE 1$ :BR IF NOT 

2706 016754 013777 001472 12506 48: MOY VCINT1, VCINT ‘RESET INTR. VECTOR 

2707 Ole7&e 905077 iseso4 CLR aVCINTI : 
278 O1&76— 900205 RTS RS :EXIT 

é 

2710 O18770 oDd009 10$: oO 

2711 O1677e O900D2 gs: RTI s CONTINUE 

Be 

714 ;LOAD MAP WITH TWO WORDS OF THE SAME VALUE 

erie ; INTO THE ENTIRE BITMAP STARTING AT LOC. 0 
2717 016774 OL004S LODSES: MOV RO,-(SP) :SAVE RO 

e71@ O16776 O1Ci4E MOV R1'-(SP) :SAVE Ri 

2719 O17000 o05077 162456 CLR avePc ‘ENSURE CLEAR PC 

2720 917004 01370: doiske MOV NUMPIX, R1 ‘LOAD COUNTER 
rel 617010 O06e01 ASR R1 :ADJUST COUNT 
2723 017012 ooso00 1S: CLR RO :START WITH PIXEL VALUE OF © 
2724 017019 105777 1s2440 2g: TSTB  aVGCSR :ENSURE MAP IS READY 
2725 017020 100375 BPL 
2726 O17022 O10077 162436 MOV RO, aVGBUF ;LOAD A PIXEL WORD 

2727 017026 105777 lee4e6 33: TSTB © aVECSR “ENSURE MAP IS READY 
2728 017032 100375 BPL 
S7sa pizo4d posaa, oe -_ FINISHED ALL PIXELS ° 

2731 817042 190404 MI u§ iB OTE SHED 

2732 017044 00 o1c421 ADD #10421,R0 :UPDATE PIXEL DATA TO NEXT L.U.T. ADDRESS 
2723 017050 10336) BCC 2$ :BR IF MORE ADDRESSES TO LOAD 
e734 017052 000757 BR 1$ ?BR TO RESET PIXEL DATA 

2736 917054 012601 4g: MOV (SP)+,R1 : RESTORE RI 

2737 0:7056 912600 MOV (SP)+:R0 ‘RESTORE RO 

e728 Oi7560 800207 RTS Po EXIT 





ee eee me + Ce 


wm i a en ae | | ee 


| MAINDEC-11-D2vSE-A eS) VIEDC GRAPHIC TEST PROGRAM MACY11 27(1006) Oe-DEC-76 17:43 PAGE &2 


7e4O 041455 051117 047520 
7e4e 040522 O44S24 047117 
7254 100000 MSSTND: SIT1S 


| DZVSERLPIL ~~ O2-JuN-76 00: SUBROUTINE Tc LOAD THE L-U.T. WITH THE VALUE OF A TAGLE 
e740 .SBTTL SUBROUTINE TO LOAD THE L.U.T. WITH THE VALUE OF A TABLE 
Ee BTS BO uric TH COs BY ering scores 
e? ] ? T RESS 
buy Bisbe9 Bi3E80 MOV (RBJ+"RO oe TABLE ADDRESS 
ews Ol70re Ole?3? o00deo 51710 mov lB. 118 ;LOAD COUNTER 
e747 DI7100 113737 O17136 217142 MOVE «105, 12841 :LORD HIGH BYTE WITH LUT ACORESS 
Ene His tise Gis wee OR athe tose trea Er 
2750 Oi7ie0 105237 o17143 Inca 1BShi UPDATE THE LUT POINTER 
e751 017124 008337 17140 bee IS ;EINISHED ALL L.U.T. ACORESSES 
E763 Ol7i3e O1ee08 mov © SP)+,RO SRESTORE RO 
e7s4 C1714 000e08 RTS RE :EXIT 
2756 017136 00000 108: 0 
e757 O17149 oo0020 118: Ie. ;COUNTER OF L.u.T 
e7s8 Oi7iMe 00000 128: 0 ;TEMP LOCATION 
‘ss 
2769 O17144 900000 YADDS: g 
2761 O17146 000009 XADDS: 9 
2762 O17150 900009 SET: 
e763 Oi7iSe 000000 OVRAL: 0 
2764 O17154 051526 030126 O26461 MSGTXT: .ASCII \VSVO1-DYNAMIC-CURSOR-ADDRESS-TEST-\ 
e765 D17ib2 O54504 O4S1g O44515 
2766 017170 052503 051522 
3767 O17176 OS1117 O40455 042104 
2768 017204 051523 052055 
2763 Ol7ele OSIS05 d265e4 
2770 O17216 O42055 043511 o52111 LASCII \-DIGITAL-EGUIPMENT-CORFORATION\ 
1 Oi7224 O46101 o4eucs 52621 

2772 017632 OS0111 O4e5i5 Obellé 
2773 Ol 

01 

oi 





< ee ee + ee CS ee 


017500 


ray) vain tan Bioheetae 
—OwoOnNOum £Wwne-O 
oO 
_ 


Hitttatitetetetitetedtedtidititetttittd 
oR 


OOd0OVOVO0O000RO 


turu 
coc 
fr 
con 


MBINDEC-11-D2VSE-A 


DIVSER.P11 O2-JUN-"6 


004S37 







é 


VSVOL VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006) 
90:00 HOME THE DISPLAY SUBROUTINE 
.SBTTL HOME THE DISPLAY SUBROUTINE 
OLebbE HOME : Y 
a oe Biristery 0’ 
177435 ¢24330 #177935 BUFFER 
516032 Wee PC RNt 
162144 1S: TST av ykes 
BPL 
RTS 8 
.SBTTL DISPLAY BIT MAP # AND TEST # 
010000 161624 TESTID: BIT oe, , aSWR 
0060 o17525 MOVE #0, MAPIND-1 
901546 017502 MOV  COAKSW, 10$ 
517502 4§: BS 10$ 
017525 INCE MAPIND-1 
000060 917502 S$: MOV 0, 108 
001204 9i7502 ADD SUNIT. 10$ 
b1750e 017526 MOVB $ MAPIN 
01102 1$: MOV STSTNM, RO 
900060 017550 MOVB #0, TSTIND 
900190 git #81t6,RO 
017550 INCB - TSTIND 
23: MOV 0.R1 
177770 BIC #177770,R1 
0060 ADD #60,R1 
017552 MOVB 1, TSTIND+2 
ASR RO 
ASR RO 
ASR RO 
177770 BIC #177770, RO 
CO0C060 ADD R 
017551 MOVB He TSTIND+1 
0014 161772 MOVE #14, aVCPOS 
000030 161766 MOVB Sou’ aVCPOSH 
17504 MOV #BRIAN, RO 
016036 JSR PC, XPRNTA 
i 
123 O47111 BRIAN: .ASCII /TESTING BIT MAP #/ 
O44S02 20124 
020120 
-BYTE 60 :1 DIG 
MAPIND: .BYTE 60 72 DIG 
o20049 oS2522 “ASCII 7 RUNNING TEST # 
947111 020107 
052123 O21440 
060 O60 TSTIND: .BYTE 60,60,60,377 


- EVEN 


a ae ee ee oe 


O2-DEC-7E 


SWAIT FOR VERT SYNC 

SLOAD "HOME" AND TERMINATOR 

GATT FOR CHAR READY 

; RETURN 

:JEST IF INMIBIT DELAY 1S SET 
N = STurF 


COAX Sid VALUE 
CONVERT TO & ager? DIGI 


OAD MAP & Ts 


sLOAD 0 

;TEST IF TEST & > 100 
;MAKE TEST # 100 

; MASK LOWER BITS 
:MAKE IT ASCII 

LOAD MESSAGE 


; MASK LOWER BITS 


ITION 
LOAD neSSAGE POINTER 
SOTSPLAY MESSAGE 
sEXIT 
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ZVSEA.PLI 02-JUN-"— 00:50 DISPLAY BIT MAP # AND TEST & 


St 3 


i 
i 
my 
| 5E56 gizssy oue77? oooeoe 161666 LOLIN: MoV #202, IVCHRLO sLOAD X CROSS HAIR LINE 
| 2831 017562 OSe777 O10000 itibse BIS sBITL2, avCCSR ‘ENABLE X CROSS HAIR 
| 2832 017570 000207 RTS PC EXIT 
34 917572 oso000 BYTST: BITIY!BITL2 
| es3S O17574 120009 BITIS‘BITI3 
17676 osoc00 BITL4Y!'BITI2 
2827 917600 120000 BITIS!BIT13 
Saag 
! eeic .SBTTL RANDOM NUMBER GENERATOR ROUTINE 
e84e 5 RERREAERLEA RELA LELELE REALL A AE RELA ERE LER ERLE LLL ELLA LEAL ELE 
| 2B43 :$THIS ROUTINE IS A DOUBLE PRECISION PSEUDO RANDOM NUMBER GENERATOR 
cove s#uITH A RANGE OF 0 TO 2(+33)- 
— BBYB + JSR PC, SRAND ;3QALL THE ROUTINE 
| BEY? 1% RETURN ?RETURN HERE THE RANDOM 
| Bg4e :% AUN WILL BE IN 
eeu # : SHINUM, SLONUM 
' 2851 O17604 $RAND 
| 852 017604 o1p046 MOV RO,-(SP) : PUSH RO ON STACK 
1 010146 MOV R1;-(SP) ::PUSH R1 ON STA 
| e854 017610 o10246 MOV Re’ -(SP) :: PUSH Re ON eTAcK 
ce tinue five Gone my RAM? a ain as 
sees ie 5135 42006 MOV gupNRD? iat ah Et COUNT 
_ pese 017626 006300 1S: ASL RO ::SHIFT RO LEFT A 
/ pase 017630 10} RO R ; sROTATE Ca ARRY NTO Rl AND 
| 861 017634 001374 BNE 1$  EONTINUE SHIFT LOOP 
017636 063700 017704 ADD $LONUM, RO ::ADD NUMBER To. MAKE X 129 
2863 017642 905501 ADC RI ; ;PROPOGATE _C 
2864 017644 063701 017702 ADD SHINUM, Ri “ADD NUMBER ror MAKE XK 129 
- 865 017650 O62700 001057 ADD #1057,R0 FADD LOW CONSTANT 
| 2BEE O17E54 O05501 ADC RI ; sPROPOGATE CARRY 
| 2867 017656 062701 047401 ADD #47401,R1 ADD HIGH CONSTANT 
| 2868 017662 010037 017704 MOV RO, SLONUM : SAVE RO 
| BBES 017666 010137 017702 MOV R1’ SHINUM SAVE R 
| 2870 917672 012602 MOV (SP}+, Re Bop STACK INTO Re 
| 3E71 017674 O1260! MOV (SP)+'RI ::POP STACK INTO RI 
| 2872 O17676 012600 MOV (SP)+/RO i #POP STACK INTO RO 
| 2873 017700 900207 RTS pc : RETURN 
| e874 017702 176543 SHINUM: .WORD 176543 


2875 017704 123456 SLONUM: .WORD 123456 
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ySVO1 
OZVSER.P1i G2-JUN-7& 00:00 RANDOM NUMBER GENERATOR ROUTINE 





| 287 
2877 .SBTTL SCOPE HANDLER ROUTINE 
| 22873 5 REXLLARRAAEAL ALAA ALLA SERER LALA LE RELA LLL AAERALLALEREALELF LE LERILE 
2880 SSTHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
| pgel *¥AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0-) 
ogg ?¥AND LOAD THE ERROR FLAG ( SERFLG) INTO DISPLAY< 15:08) 
2583 : THE Si SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
2885 oes LOOP ON TEST IN SWR<7:0> 
2886 :¥CALL 
2887 1% SCOPE : ;SCOPE=IOT 
2998 
2889 017706 SSCOPE: 
2890 617708 104407 CKSUR :;TEST FOR CHANGE IN SOFT-SWR 
2891 017710 104407 CKSWR 
2892 017712 032777 O40000 161220 1S: BIT #81714, ISWR ;;L0QP ON PRESENT TEST? 
28983 017720 901040 BNE § ‘YES IF SW14= 
2394 eeeseSTART OF CODE FOR THE XOR TESTERMHHaS 
2895S 017722 ODD4IE éxTSTR: BR 65 ;31F RUNNING ON THE “XOR™ TESTER CHANGE 
cag? 017724 013745 o00004 MOV S¥ERRVEC (SP) + Oe OE CONTENTS OF THE ERROR VECTOR 
ext 33 CT 
| 2898 017730 012737 917750 00004 MOV ERRVEC 3 35ET FOR {TaMEOUT, 
| 2899 017736 005737 177060 TST LF i O06 TIME 0 
2900 017742 012637 OoD004 MOV (SP)+, JHERRVEC | RESTORE THe XRF OR VECTOR 
| 9301 017746 900414 BR ssviab 36010 T HE NEXT 
| e902 017750 Oe2626 cs: CMP (SP)+, (SP)+ 3¢ THE ST K AFTER A TIME OUT 
' 6803 617752 012637 coocoY MOV (SP)+’ SRERRVEC EEE TORE HE ERROR VECTOR 
| 2304 017756 o00421 BR SOVER’ ::LOOP ON THE PRESENT TEST 
| 8905 017760 &$:;##8eBEND OF CODE FOR THE XOR ‘+ESTER BEE 
| e906 017760 032777 oDD400 161152 BIT #BITO8, JSWR ;;LOOP_ON *Shec. TEST? 
| 5907 017766 O01404 BEG 'BR IF 
| 908 017770 127737 161144 001102 CMPB so SW, STSTNM $ TON THE RIGHT TEST?  SWR<7:0> 
' p809 917776 OO1411 BEQ SOVER 33BR IF YES 
' p910 g20090 105237 op1i0e2 SSVLAD: INCB $TSTNM COUNT TEST NUMBERS 
| 811 O20004 113737 001102 001176 MOVE STStnn STESTN iiSET TEST NUMBER IN APT MAILBOX 
| 2912 O20012 011637 001106 MOV (SP), $LPADR ;;SAVE SCOPE LOOP ADDRESS 
2913 O20016 105037 001103 CLRB = SERFLG ERO THE ERROR FLAG 
| p914 020022 013777 OO1102 161112 SOVER: MOV STSTNM, aDISPLAY ; DISPLAY TEST NUMBER 
| 2915 020930 013716 001106 MOV SLPADR; (SP) :FUDGE RETURN ADDRESS 
2316 020034 oooo02 RTI FIXES PS 





MAINDEC-1 
D2VSEA.P11 


1-DZVSE-A 
Ge-JUN-7E 00:C 


02017e 


104407 
022737 
001001 
000000 


000092 





001103 


020000 


020174 
001167 


oo0001 


001114 
021522 


160766 


003304 


vaVeR VIEDC GRAPHIC TEST PROGRAM 


O0iele 
020142 


ocod4e 
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SCOPE HANDLER ROUTINE 


.SBTTL ERROR HANDLER ROUTINE 

[sesetnonqunamapentyeresuensteeso pelea" erswoeneuer saeemeanaae 
ATHIS ROUTINE WILL een THE ERROR FLAG AND THE ERROR COUNT, 
i #SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 


RRTYP ON 
js THE SWITCH wee aa hE BY THIS ROUTINE ARE: 
; *SW HALT ON ERROR 


15=1 

; SUL 3=1 INHIBIT ERROR TYPEOUTS 

ie ERROR N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 

SERROR: 
CKSWR ;; TEST_FOR ne IN SOFT-SWR 

7$: INCB SERFLG b3Reh THE ERROR FLAG 
BEG ;DON’T LET THE FLAG GO TO ZERO 
MOV S$TSTNM, JDISPLAY ; sDISPLAY TEST NUMBER AND ERROR FLAG 
INC SERTTL ;INC THE ERROR NT 
MOV (SP) , SERRPC ;;GET ADDRESS OF ERROR INSTRUCTION 


SUB #2, SERRPC 
MOVE § aSERRPC,SITEMB ;;STRIP AND SAVE THE ERROR ITEM CODE 
BIT #81713, aSWR :: SKIP P TYPEOUT IF SET 


BNE 20$ ::SKIP TYPEOUTS 
ISR PC. SERRTYP :G0 TO USER ERROR ROUTINE 
eh TYPE  ,SCRLF 
CMPB ss HAPTENV, SENV ss RUNNTING IN APT MODE 
BNE 2s SKIP APT ERROR REPORT 
MOVB § $ITEMB,21$ aes ITEM NUMBER AS ERROR NUMBER 
ISR PC, SATYY tEREPORT FATAL ERROR TO APT 
21$:  .BYTE O 
"BYTE 0 
225: BR 225 ; APT ERROR LOOP 
Os: TST aSWR ‘HALT ON ERROR F 
BPL 33 3s SKIP IF CONTINUE : 
HALT ‘HALT ON ERROR! 
a CKSUR TEST FOR CHANGE IN SOFT-SWR 
CMP #SENDAD,a842 ;;ACT-11 AUTO-ACCEPT? 
BNE bS ; | BRANCH IF NO 
“a HALT YES 


RTI ; ; RETURN 
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eee re eee ee 
| MBINDEC-11-D2vSE-8 VSVOL VIEDO GRAPHIC TEST PROGRAM M@CYL] 27.1006) OE-DEC-7— 17:42 PAGE &7 
| D2VSER.PIL | (DE-lun-7 00:50 ERROR HANDLER ROUT! 
| ’ 
| 5963 .SBTTL ERROR MESSAGE TYPEOUT ROUTINE 
Esse ; SPSSFSRSSEESESESSAESESRETRESESSESEEASESSSSSSESSSESSSAASESES LESS 
Zes TATHIS ROUTINE USES THe “ITEM CONTROL BYTE” (SI TEMB) TO DETERMINE WHICH 
| psee :@ERROR 1S TO BE REPORTED. IT THEN OBTAINS, FROM THE “ERROR TASLE™ ($ERS7,, 
| e367 :#AND REPORTS THE APPROPRIATE INFORMATION LONCERNING THE PRROR. 
€ 
| 2365 920174 SESRTYP: 
2670 De0174 10440) O0:167 TYPE SCRLF a = CARRIAGE RETURN” $ “LINE FEED” 
| 71 D20200 O1D046 MOV RO -(SP) SAVE R 
es7—e Oe0ede 099 CLR RO ::PIZKUP THE ITEM INDEX 
| pS?s Sede 183700 o01iis SIS «© daSITENE,RO 
| p874 Oedeic O01 BNE 1$ s31F ITEM NUMBER 1S ZERO, JUST 
| BTS :: TYPE THE PC OF THE ERROR 
| 2S7& O2C2le OL374e COLLIE MCV SERRPC, -( SP) 3+ SAVE SERRPC FOR TYPEOLT 
eS77 3 
2378 020216 104402 TYPOC 330 TYPE--OCTAL ASCII(ALL DIGITS) 
| p87 020320 don426 ce aS 73987 oUF 
2980 O20222 005300 18: DEC RD JUST THE INDEX SO THAT IT WILL 
2981 O20224 006200 ASL RO $3 WORK FOR THE ERROR TABLE 
| 9882 «Oedes 006309 asi RO 
| 2983 020230 906305 as. 
| p884 020232 062700 o01256 aSERRTB. RO :;FORM TABLE POINTER 
~=—« SBS «020236 ~012e037 Fede4e MOV (RO)+,28 ::PICKUP “ERROR MESSAGE” POINTER 
| —986 dede42 901404 BES 35 :;SKIP TYPEQUT IF NO POINTER 
2387 Oecl44 104401 T :: TYPE THE "ERROR MES 
2988 Godc4G 2s: .WORD 69 :: "ERROR MESSAGE” F POINTER GOES HERE 
2329 104401 001167 TYPE, SCRLF :: "CARRIAGE RETURN" & “LINE FEED" 
2996 4 O12037 d20ce4 2S: MOV 'RO}+, 4S ::PICKUP “DAT HEADER™ Born TER 
2991 001404 BEG 3 ::SKIP TYPEOUT IF O 
2992 104401 TYPE TYPE T Th HEADER™ 
| p93 000000 48: .WORD 0 T:"DATA HEADER” POINTER GOES HERE 
2535 194491 00117 TYPE SCRLF *:"CARRIAGE RETURN” 8 “LINE FEED" 
23sec - 911000 cs: MOV RO), RO 3s PICKUP “para pnRgLe” POINTER 
e238 020274 001904 BNE 73 :GO TYPE T 
020276 012600 é$: MOV (SP)+,RO : RESTORE RO” 
2998 020200 104401 901167 TYPE SCRLF ::"CARRIAGE RETURN” 8 “LINE FEED” 
2339 620304 000207 RTS PC : RETURN 
3000 020306 73: 
' 3001 020306 o1 QCRO)+, -(SP) ;3SAVE 9(RO)+ FOR TYPEOUT 
3002 920310 104402 TYPOC :GO TYPE--OCTAL ascii calt DIGITS) 
3003 Oe03l2 O0S710 TST RO) its THERE ANOTHER NUMBER? 
2004 020314 901770 BEQ 6$ ::BR IF NO 
2005 20316 104401 020324 TYPE =} >: TYPE TWO(2) SPACES 
2006 920222 900771 BF 9§ 7340 
2007 020324 o20940 soc gs: JASCIZ 7 7 ::TWO(2) SPACES 
2206 029230 “EVEN 
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maindecet 13 1-D2VSE-8 SVC: VIEDC GRAPHIC TEST PROGRAM MACY11 27(1006) OS2-DEC-7& 17:42 PAGE eS 
DIVSER. 5S-cuN-" Saas ERROR MESSEGE TYPEOUT ROUTINE 
3008 
te .S8TTL BINARY TO OCTAL (ASCII) AND TYPE 
Mle s SFESSSAAASSASSLESSSSLSARERLEHHLSLEAATRALELSSS LSFFESAAFFSLSLARELE 
ais saTHIS, ROUTINE 1S us D TO CHANGE A i6-BIT BINARY NUMBER TO A E-CIGIT 
ai ; #STYPOS---ENTER UERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO Tree 
Jol eo in? 
301° 1% MOV NUM, -(SP) NUMBER TO BE TYPED 
3tis :* TYPOS CALL FOR TYPEOUT 
3718 :# BYTE N ?:N=] TO & FOR NUMBER OF DIGITS TO TYPE 
352¢ + BYTE MM 23 M= 
352: 2% :;1=2TYPE LEADING ZEROS 
S068 # Hy UPPRESS LEADING ZEROS 
www 7% 
3054 : #§TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
3025 :#§TYPOS OR $TYPOC 
3026 > #CALL: 
3027 7 MOV NUM, (SP) :;NUMBER TO BE TYPED 
3028 :* TYPON ::CALL FOR TYPEOUT 
=5§ . 
3030 : #81 YPOC---ENTER HERE FOR TYPEOUT OF & 16 SIT NUMBER 
3532 :# MOV NUM, - (SP) :;NUMBER TO SE TYPED 
x3 te TYPOC ::CALL FOR TYPEOUT 
3035 0203230 O17&46 900900 STYPOS: MOV a(SP),-(SP) ;;PICKUP_THE MODE 
3036 029334 116627 20000: oenss2 MOVE = 1(SP)‘SOFILL LOAD ZERO FILL SWITCH 
3037 o20342 11 o20555 MOVE  (SP)+' SONODE +1 :  RUNBER OF bIsits TO TYPE 
3038 062716 D 82, (SP) :: ADJUST RETURN ADDRESS 
3028 029252 900406 BR § {PON 
2040 020354 112737 90000: oe0SS3 S§TYPOC: MOVE 81,SOFILL :SET THE ZERC FILL SWITCH 
304: 920362 112737 990006 o=0555 MOVE #6, SOMODE+1 :iSET FOR SIX(6) DIGITS 
3042 020370 112727 O0000S OS0SS2 S$TYPON: MOVB 85, S0CNT ;SET THE ITERATION COLNT 
3043 01934 MOV R3.-(SP) ::SAVE R3 
3044 O20400 o1044E MOV RY’ -(SP) >; SAVE RY 
2045 O20402 O1OS4E MOV RS‘ -(5P) >: SAVE RS 
S046 C4 113704 oecsss MOVB pice ::GET THE NUMBER OF DIGITS TO TYPE 
2047 10 404 NEG 
3548 i o4 o ;;SUBTRACT IT FOR MAX. ALLOWED 
304S O20416 110437 a20554 MOVE Ra’ SON00E $3 IT FOR USE 
Ce0422 113704 Se0ss3 MOVE OFILL, :GET THE ZERO FILL SWITCH 
2051 Oe0426 O1660S O000l2 MOV 12(SP): Re : PICKUP THE INPUT NUMBER 
020432 905003 CLR R3 *CLEAR THE OUTPUT WORD 
3053 020434 906105 1S: ROL RS : ;ROTATE MSB INTO “C™ 
3054 020436 900404 BR 33 D 
3055 020440 O06105 2s: ROL RS ::FORM THIS DIGIT 
3056 Oe044e 906105 ROL RS 
3057 Se0444 906105 ROL E 
3956 oeo44— 010502 MOV RS,R3 
2053 O20450 006103 33: ROL R3 :;GET LSB OF THIS DIGIT 
3065 020452 105337 oenssy DECB 4  $OMODE :; TYPE THIS DIGIT? 
3061 S2e0456 100016 SPL ? :BR 
20te S20460 042703 177770 BIC 8177770, R3 ier RID OF JUNK 
2ob3 Oe0464 001002 BNE 4g ssTe 
306s 20466 005704 TST RY ::SUPPRESS THIS 0? 
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| MGINDEC-1:-D2VSE-8 VSVOL VIEDC GRAPHIC TEST PROGRAM macyLt 27(1006) O2-DEC-76 17:42 PAGE &S 
—D2VSERLPLL ~~ Od-lun-76 00:56 BINARY 70 OCTAL (ASCII) AND TYPE 
3065 D2087D 90:403 S59 c$ $3 YES 
Sem47e 506204 43 INC Ry ::DON’T SUPPRESS ANYMORE O°S 
? DeoNr4 952703 oco0Ec 81S 8°0,83 »:MAKE THIS DIGIT AScI! 
$58 920500 OS2702 20904¢ 3 he a" R3 -:MAKE ASCII IF NOT ALREADY 
$ 2 115337 5enssc “OVE 3,95 ?: SAVE FOR TYPING 
o20510 104401 o2955° TYPE 9¢ 3360 TYPE THIS DIGIT 

O71 920514 105337 o20552 "g pecs} =s-s« SOCNT :COUNT BY 

3072 G6 903347 367 2§ :3BR IF MORE TO DO 

3073 20522 o02402 BLT &$ F 00 

3074 520524 905204 INC RY :  TNSURE LAST DIGIT ISN’T A BLANK 
2075 ds0See 900744 aR 23 ::G0 DO THE LAST DIGIT 

2576 O20530 912605 6s: MOV (SP)4,R5 : :RESTORE R 

C7? O2e9S32e O1260 MOV (SP)+,R4 > ;RESTORE R 

3078 512653 MOV (§P)4°R3 !:RESTORE R3 

2079 O2053¢ OCIsss& so0cce 200004 MOV 2(SP)4(SP) pak THE STACK FOR RETURNING 

2085 d20544 O]>¢1¢ MOV (SP)4! (SP) 

3081 Oeos4s 6009 RTI TURN 

3062 920550 508 2g BYTE 9 +8 ORAGE FOR ASCII DIGIT 

3083 320551 903 9 j TERMINATOR FOR TYPE ROLITINE 

3084 20552 506 SOCNT: {BYTE S:0CTAL DIGIT 

2085 920553 555 SOFILL: .BYTE 0 $3ZERO FILL SWI oN 

3086 Oeds&4+ 009556 SOMODE: .WORD 6 *NUMBER OF auisits TO TYPE 

3087 "SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 

30283 poeta MITIIG Ie LEED TD COE BIL RIT RITGUY NAIEER TO A SOT 
3096 :ETHTS ROUTINE IS USED TO CHANGE A 1-817 BINARY NUMBER TO A S- DIGIT 
3051 > SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
3592 ; #NUMBER 1s POSIT IVE OR NEGATIVE @ SPACE OR A MINUS SIGN WILL BE TYPED 
3593 :eBEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
ae i FREPLACED WITH SPACES. 
30% + MOV NUM, - (SP) ;;PUT_THE BINARY NUMBER ON THE STACK 
27 te TYPDS ::G0 TO THE ROUTINE 

2098 20556 STYPDS: 
3106 Oe055— oc1oo4e MOV RO,-(SP) ;;PUSH RO ON STACK 

3101 O20560 O1014¢ MOV R1'-(5P) !;PUSH R1 ON STACK 

2102 d20c2 919546 MOV Re: -(5P) ::PUSH Re ON STACK 

2103 e054 010346 MOV R3,-(5P) ::PUSH R3 ON STACK 
2104 020566 O10S46 MOV RS, -(SP) >:PUSH RS ON STACK 
3105 020570 O12746 o2o200 MOV w20200,-(SP)  :SET BLANK SHITCH AND SIGN 
3106 920574 Olee0s ooode9 MOV 20(SP)°RS ::GET THE INPUT NUMBER 
3107 929600 109004 BPL 1$ ::BR IF INPUT IS POS. 

2198 O20602 ooS40s5 NEG RS ?:MAKE THE BINARY NUMBER POS. 

3109 112766 oc00SS 00001 MOVB = &" =, L( SP) !:MAKE THE ASCII NUMBER NEG. 

311¢ 20612 05000 1$: CLR RO ;;ZERO THE CONSTANTS INDEX 

3111 O20614 012703 020772 MOV #SDBLK,R3 :SETUP THE OUTPUT POINTER 

Ziie Oe0620 112723 sd0040 MOVE 8° ,(RA)+ ter THE FIRST CHARACTER TO A BLANK 
3113 20624 23: CLR R2 ;;CLEAR THE BCD NUMBER 

2114 O20626 O1E001 920762 MOV SOTBL(RO).R1 THE CONSTANT 

3115 O20632 160105 3S: SUB R1,RS : FORM THIS BCD DIGIT 

3116 020634 op2402 BLT 4§ R IF 

2117 020636 od0S202 INC R2 INCREASE THE BCD DIGIT BY 1 

2112 S20640 000774 BR 3$ 

2115 Oe0642 0105 4$: ADD R1.RS :;ADD BACK THE CONSTANT 

2120 D20644 905702 TST R2 ::CHECK IF BCD DIGIT=0 
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| MBINOEC-11-DivSE-A VSVC. VIEDC GRAPHIC TEST PROGRAM MACY11 27(1006) 








O2-DEC-76 17:42 PACE 70 
D2VSER.PIL © O2-Jun-7E 00:00 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 
3121 O2064— 901002 NE $$ : EARL THROUGH IF 0 
3/83 Seeso «dss TStB «(SP “STILL DOING LEADING 0°S? 
3:83 d20652 190407 a ent “$ !:BR IF YES 
4 : Min 
sige REDE! ifgsi8 dee tie TF NO 
3126 118663 900001 177777 MOVB =: 1 (SP) ,-1¢R3) !:YES--SET THE SIGN 
3127 Se0666 OS2702 o90960 &$: BIS #°0,Re ::MAKE THE BCD DIGIT ASCII 
3122 Dede 7e 052702 900042 33: grs a’ (Re ;;MAKE_IT_A SPACE _IF NOT ALREADY & DIGIT 
3129 OS067E 110223 MOVE Re, {R3)¢ ::PUT THIS CHARACTER IN THE OUTPUT SUFFES 
3:30 920700 720 TST CRO)4+ 35 JUST INCREMENT ING 
313] 520702 Oe00e7 900010 CMP RC, #10 ?:CHECK THE TABLE INDEX 
ise Oe0706 Ode74E BLT 2 ::G0 DO THE NEXT DIGIT 
3133 9829719 903002 BGT 8§ :G0 TO EXIT 
3135 050714 o00764 BR bg :GO CHANGE TO ASCII 
3136 Oec7is its726 as: TST8 ss (SP)+ HRS THE LSD THE FIRST NON-ZERO? 
3137 9729 100093 BPL 95 FN 
3i38 820722 116663 177777 17777 MOVB  -1(SP),-2(R3) Pec cry THE SIGN FOR TYPING 
3139 920730 105013 S$: CLRB ss (RB) ::SET THE TERMINATOR 
3:40 920732 912605 MOV (SP)+,R5 t:POP STACK INTO RS 
3341 020724 912603 MOV (5P)4°R3 ::POP STACK INTO 
3142 020736 O12602 MOV (SP)+:Re ::POP STACK INTO R2 
3143 020740 O12691 MOV (5P)+;R1 ::POP STACK INTO RI 
3144 O20742 012600 MOV (5P)+'RO :;POP STA TO RO 
3145 De0744 104491 920772 TYPE SDBLK 33 TYPE THE NUMBER 
3146 O20750 O1ses& 800002 oo00o4 MOV 2 (SP), (SP) -:ADJUST THE STACK 
3147 O20756 Oleeis MOY (SP)4+ (SP) 
3148 929760 000002 RTI ;;RETURN TO USER 
3:49 020762 922420 SOTSL: 10900 
3150 20764 001750 
3:51 OS0766 500148 90 
3152 850775 955S:e2 5 
Sigs Sen772 888065 $DELK: BLEW 4 


mm ee ee 


ois 


“! 


goood 


ateatuuiictetetel 


tg 


wn 
Oo 


~ 


tote ain: tofu owen 


RiairRremarrakatte 


Qo000 


ing 
adtue-C 


ZROREBONE RE 


tb bs 
oo £vVvuoO 


00000000 G00 0 G00 OO 0 0 0 Gd Gd Cd dd Ca ad Cd 0 G0 Gd Gd Cd ad Gd a Cd Ge ad 
0 B20 B= be B+ bs bs 0-2 be 9 0-2 Bs be ho bs Fb he 8 a be Ba 0 8 Fe hw ho Oo hs 8 ae Po Beh 8 Oh 8 Be Bh hh Be pe 


FO FO FOFOFOFOFUFOFUFOFD TO fOr FO FO FATTO FOFOFDFU IFO FO FOF AD 
LISHENGEEDSK LSS 


+ b= b= = ps bs 92 & 2 bs F 2 & 2 Bs Bs & 2 B= hs fe & - 2 Bo f= BB -0 2 he Bs Fp 
TOTO Me 0 b+ 2 b= bs bo + he bs pe > 


or 


FONE BBS VAR POOLS Be VRE colo Oe Soul 2c 
russ 


oad Cad Catlad 
fohohtor 
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VSE-8 VSVOl VIEDO GRAPHIC TEST PROGRAM MACY11_27(1006) OQe-CEC-7& 17:43 PAGE 71 
e-SUN-"6 00:00 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


-SBTTL POWER DOWN SND UP ROUTINES 


se FSSFEEAAARALALFLAAELELAELALEAFLELLLELE ELEAF ELFLASLELLLESSESLEREFE 
-BOWER DOWN ROUTINE 


O12737 «921148 990024 S$PWRON: MOV SSILLUP asPWRVEC ;;SET FOR FAST UP 
Ciera? 900340 S603c¢ MOV #340, aHPWRVEC+2 ;:PRIO:7 
O10046 MOV RO,-(SP) ;;PUSH RO ON STACK 
910246 MOV R1;-(SP) ;§ PUSH R1 ON STACK 

1Ge46 MOV Ro’ -( SP) !!PUSH Re ON STACK 
510346 MOV R3,-(5P) ;;PUSH R3 ON STACK 
O10446 MOV RY; -(5P) +: PUSH STACK 
610546 MOV RS’-(5P) >:PUSH RS ON STACK 
Hiv74e 180102 MOV aSWR, - (SP) ::PUSH 3SWR ON STACK 

? 921:S2 MOV SP, SSAVRE :: SAVE 
Ole737 21054 90024 MOV SSPWRUP, JSPWRVEC';;SET UP VECTOR 
906006 HALT 
000776 BR 2 ;;HANG UP 
Fs SEFSLAARASESELSSLAFTASL ELS HEAL RAELLLELELALARALATELEARELEESELAZE 
“POWER UP ROUTINE 

012737 921146 con024 §PwRUP: MOV SSILLUP, D#PWRVEC ;;SET FOR FAST DOWN 
137 921152 MOV AVR6 , SP ::GET SP 

Eos? de1is CLR VR6 !:WAIT LOOP FOR THE TTY 
005237 o2115e 18: INC $SAVRE ::WAIT FOR THE INC 
901375 BNE 1$ ::0F WORD , 
012677 160034 MOV (SP)+, JSWR ::POP STACK INTO aSuR 
012605 MOV (SP)+°R5 ::POP STACK INTO RS 
012604 MOV (SP)+' RY ::POP STACK INTO RY 
012603 MOV (5P)+'R3 ::POP § INTO R3 

12602 MOV (SP)+/Re ::POP STACK INTO Re 
012601 MOV (SP)+-R1 ::POP STACK INTO Ri 
012600 MOV (SP)+'RO >:POP STACK INTO RO 
0127327 21002 occoes MOV SSPWRON, JSPWRVEC’::SET UP THE POWER DOWN VECTOR 
012737 00340 odode MOV 8340, a8PWRVEC+E ;:PRIO:7 
104401 TYPE ::REPORT THE POWER FAILURE 
021154 SPWRMG: .WORD  PWRMSG *:POWER FAIL MESSAGE POINTER 
012716 MOV (PC)+, (SP) ::RESTART AT BEGIN 
001572 $PWRAD: gllORO BEGIN ::RESTART ADDRESS 
B59555 SILLUP: HALT ;;THE POWER UP SEQUENCE WAS STARTED 
000776 BR 2 :: BEFORE THE POWER DOWN WAS COMPLETE 
009000 SSAVRE: 0 - + Pl 


: PUT THE SP HERE 
Desois gve5ee 052123 PWRMSG: .ASCIZ <15><1l2>/RESTARTING AFTER A POWER FAILURE’<15><12> 


ons O4eSee O0S015 
S@lee2e - EVEN 


fahstutatatahahthabitatatabaiitats 
aide aie 


TUTUT Ube + b+ 0 +0 + 0-+ 0 ~~ ape 
fue (wd ~ ru & totue- 


seb 
bd 4 A 
tetuity 


fo 
rururu 
fe 


fururure 
: SS 
Re 


FOFOFUFD FOFOFOFOFOFOFUTOFOTORG FO FOrUTU FOFUR OIG FOFOFU FUFD FU FUFO FO FUROR FORD 
P 


rm 


RoR SNE RERE 


WGI) 
o— 9-<h= 
£m 


RE ESR oy 


he a hs bs Be a Bm be be ba be be Be 2 he he hs be hms fo ho Bn ho f= Be ho he he 
TRAARE PROS 
& how 


mum 
Sau 
ictta 


wots 
hohe 


002770 
004737 
105337 


991157 


O000Se 
000031 
oco2c0 


021500 


021434 
OSiiSe 


001154 
009001 


OE 1434 
021509 
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. \ZEDC GRAPHIC TEST PROGRAM MACY11 €7(1006) Oe-DEC-7& 17:43 FRGE 72 


TYPE ROUTINE 
~SETTL TYPE ROUTINE 


; RERERERRERERASEERERSLRSESEESSERELRESRALEA ELE RAPERES REESE ELEY 
:#ROUT INE_TO TYPE ASCIZ Me er ee MUST Mtb WITH # Q EYTE. 
a oT ig oO NUMBER OF NULL CHARACTERS AFTER A LINE FEEC. 


:#N NTAINS THE CHARACTER y BE USED AS THE FILLER CHARACTES. 
;#NOTES: SFILLS CONTAINS THE NUMBER OF FILLER oe RESUIRED. 
i #NCTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 


CALL: 
ge USING & TRAP INSTRUCTION 
TYPE .MESADR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


SOF 
:% TYPE 
:* MESADR 
2. 
$TYPE: IsTe SIFFLG 3315 THERE A TERMINAL? 
HALT HALT ERE IF NC TERMINAL 
BR 33 , :: LEAVE 
1g MOV RO =P), 2 RO 
MOV a2{SP) :GET ADDRESS alk ASCIZ STRING 
CMPB SaPTENY SENV Hee 
SNE NO, GO C cK E FOR CONSOLE 
BIT2 © SAPTSPOOL, SENVM ; SP POOL T0 APT 
BEQ NO. GO Beck F FOR CONSOLE 
MOV RO,61$ >:SETUP MESSAGE ADDRESS FOR APT 
ISR PC. $ATY3 SPOOL MESCAGE TO AP 
61S: “WORD 0 is MESSAGE ADDRESS 
62:  BITB  sAPTCSUP,SENVM ;:APT CONSOLE SUPPRESSED 
BNE 60$ ss YES, Sk bance our ee 
2s: MOVE (RO)+,-(SP) 3 3PU a KE pRACT R TG BE TYPED ONTO STACK 
BNE 4§ : BR TE IT ISN’T THE TERMINATOR 
TST (SP)+ TIF ERMINATOR POP IT OFF THE STAC 
o$: Mov (SP )+.RO RE 
2$: goo #2, (SP) ; ;ADJUST RETURN PC 
4$: CMPB ss BHT, (SP) ::BRANCH IF <HT> 
BEG Bs 
cee SCRLF, (SP) ;;BRANCH IF NOT <CRLF> 
TST (SP)+ :;POP <CR><LF> EQUIV 
TYPE :: TYPE A CR AND LF 
SLRS $CHARCNT 3 CLEAR CHARACTER COUNT 
BR 2g T NEXT CHARACTER 
cs: ISR BC STYPEC 360 TYPE THIS CHARACTER 
&$: CMPB 3=s«oSFTLLC,(SP)+ 3:18 IT TIME FOR FILLER CHARS. 
BNE 2$ 331F NO GO GET NEX 
MOV $NULL,-(SP) :;GET # OF FILLER CHARS. NEEDED 
!:AND THE NULL CHAR. 
73: CECB sd SP?) :iDOES A MALL NEED to aE TYPED? 
oT 6$ :BR IF NO--G6 POP THE NULL OFF OF STACK 
JSR PC STYPEC tiG0 Ty 


YPE A NULL 
DEC SCHARCNT :;D0 NOT COUNT AS A COUNT 





een ae 8 eee 
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MSINOEC= 11-D2VSE-4 vSv0: VIEDC GRAPHIC _TEST_PROGRAM MACY11 27(1006) O2-DEC-7E 17:42 PAGE 72 
_ DIVSES.E Se-Jun-7@ 68:68 TYPE ROUTINE 

3261 C2140 O00TTO 2k 7$ + :LCOP 

3262 

3263 :HORIZONTAL TAB PROCESSOR 

3265 021410 112716 o0004C og: MOVB > (SP) : sREPLACE TAB WITH SPACE 

3286 521414 O04737 921434 3g: ISR Po, $TYPEC ; TYPE A SPACE 

3267 521420 132727 O00007 oe:sos BITB #7, SCHARCNT :iBRANCH IF NOT AT 

3268 O2145€ 001372 BNE ag ;TAB STOP 

3265 921430 9O957 TST (SP)+ : t pop SPACE OFF STACK 

3270 Oe {a3 o0724 QR 25 ::GET NEXT CHARACTER 

Seri 21434 105777 157510 STYPEC: TSTB osTPS ::WAIT UNTIL PRINTER IS READY 
7e Oel44o 100375 BPL STYPEC é 

3273 C1442 116677 coddde 157502 MOVB e. SP) a3PB ::LOAD CHAR TO BE TYPED INTO DATA RES. 

3274 Oel4sO 122766 900315 4S000c= CMPB R,2tsp :31S CHARACTER A CARRIAGE RETURN’ 

3275 O21456 60:003 ONE ie ;;BRANCH IF _NO 

3276 Gei460 105037 o21500 CLR SCHARCNT ;;YES--CLEAR CHARACTER COUNT 

3277 ODel4¥64 090406 é BR STYPEX ¥IT 

3e7S OS1466 «lee76— 000012 ooIcce 1S: CMPB LF. (SP) :TS CHARACTER A LINE FEED? 

3279 921474 O6140e BEQ STYPEX en CH IF YES 

3280 21476 105227 INCB = (PC) + :COUNT THE CHARACTER 

3281 021500 900900 SCHARCNT: WORD 0 CHORACTER SOUNT STORAGE 

328 021552 609207 STYPEX: RTS PC 

2284 .SBTTL APT COMMUNICATIONS ROUTINE 

3286 see pea 2? tupaemat ia (aime tctiata et a At inlet lalla 

3287 G2iS04 112737 000001 021759 git: Move #1,$FFLG TO REPORT FATAL ERROR 

3288 G215i2 112737 OCO0Dl O2i746 $aTy3: MOVB #1, SMFLG 70 TYPE A MESSAGE 

3283 021520 900403 oR Atyc 

3290 021522 112737 900001 O21750 SATY4: MOVB #1,S$FFLG :;T0 ONLY REPORT FATAL ERROR 

3291 021530 SATYC: 

3232 021530 o1o04 MOV RO,-(SP) ::PUSH RO ON STACK 

3293 021532 010146 MOV R1.-(SP) 3s BUSH Rl ON STACK 

3294 921534 105727 o21746 TSTB = SMPLG : SHOU LD TYPE A MESSAGE” 

3295 621540 601450 BES 35 IF NOT 

3296 021542 122737 90000: oo1212 CMPB ss BAPTENY, SENV + OPERATING UNDER APT? 

3297 921550 001031 BNE 3$ OT: BR 

3298 021552 132737 900100 ofie12 BITB  sAPTSPOOL, SENVM $1 SHOULD SPOOL MESSAGES? 

3299 021560 O01425 REO F BR 

3300 021562 0176090 oo0004 MOV 34(SP),RO S3GET neSsAGe ADDR. 

330i Oe1566 062766 o00092 osooo04 ADD #2, 4(SP) “BUMP RETURN ADDR. 

3202 021574 905737 001172 1S: TST SNSGTYPE :}SEE IF “BONE We LAST XMISSION? 

2303 921600 001375 BNE 1$ IFN WAIT 

2204 21692 019037 oo1206 MOV Ro $MSGAD ::PUT Boar tN MAILBOX 

2305 O21608 105720 2s: TSTB 3s (RO) + ::FIND END OF MESSAGE 

3306 O21619 0013 BNE 2g 

3207 O21612 163700 o01206 Sus SMSGAD, RO ;;SUB START OF MESSAGE 

3308 Oflb1E O06 ASR RO ::GET MESSAGE LNGTH IN WORDS 

2209 921620 910037 op1210 MOV RO, SMSGLGT $3PUT LENGTH IN MAIL 

3310 O21624% 912737 O00004 on1172 MOV #4’ SMSGTYPE :: TELL APT TO TAKE Hee. 

32i1 921632 000413 BR 

3212 021634 017637 CODDD4 oO2ibED 3s: MOV a4(SP) 4S :;PUT MSG ADDR IN JSR LINKAGE 

3213 Cele4e O62766 900002 occcn4 ADD #2, 4(SP) :BUMP RET UR nN ADDRESS 

2214 21650 013746 177776 MOV 177776,-(SP)  ;;PUSH 4 1d5556 ON STA 

2215 Oeles4 004737 Oelez2 ISR PC, STYPE ?:CALL TYPE MACRO 

331 21660 d00000 43: .WORD «60 





b+ 


ae 


SNNISISINISII OOOO Oo 


RRB RRR Raa BBR: 
SHES LS VON Ee Loew 


“In I~IY- 


uw 


VSVoi 
90:66 


C21750 
O0l2le 
O01ive2 


oC oT TEST PROGRAM 


S$: 
108: TSTe 
BEG 
TST 
SE9 
118: TST 
BNE 
MOV 
ADD 
INC 
les: CLRE 
CLRB 
CLRB 
MOV 
MOV 
RTS 
SMFLG: .8YT 
SLFLG: .BYTE 
SFFLG: .BYTE 
EVEN 
ab1S1ZE=200 
APTENV=00 


RPTSPOOL=100 
APTOSUP=040 





{ MAcYi1 27015 
COMMUNICATIONS ROUTINE 


SFFLG 
128 

sen 
SMSGTYPE 


us 
4(SP) , SFATAL 


4( SP) 


+: SHOULD REPORT FATAL ERROR? 
RIN NG UNDER APT? 
ie LAST MESSAGE” 


RET 
TELL oa oO TAKE ERRCR 
TAL FLA 


Ha STACK INTO R1 
P STACK INTO RO 


a ee eS 
























| MAINDEC-11-D2VSE-A ¥SVOx VIEDC sat TEST PROGRAM MACY11 27(1006) Oe@-DEC-7— 17:43 
| DZVSER.P11 O2-JUN-"é 00:00 Y INPUT ROLTINE 


3341 .SBTTL TTY INPUT ROUTINE 
3343 | SESE ELESLHHARERESERSLSS SSSA SESLERALSSAEEAAAAELA FASE LFRFLESLEFREE 
a3 ‘ENABL LSB 
3346 = SHERAARESRASERAL SERRE LARERAA ALE REKRAAL ELA RARE LARALAELFLEZAEAEARELKFE 
3347 : $SOF TWARE SWITCH REGISTER CHANGE ROUTINE. 
3348 t SROUTINE 15 ENTERED FROM THE TRAP HANDL WILL 

345 - #SERVIC THe TEST FOR CH CHANGE “tes SOF TARE RaTTeH REGISTER TRAP CALL 
366 “HEN ERR ING IN 
3351 921758 028737 o00176 001140 $ckSUR: cP 3H WRE EG SUR $3 15 THE SOFT-SHR SELECTED? 
2335 BSt5e5 105777 1S715¢ ENE 13346 PiGH AR Here? 
3354 O21766 109071 BPL 15$ :IF NO, DON’T WAIT AROUND 
3385 bel77e 117746 $7182 Ove a j3SAVE THE CH CHAR 

C atC17 3 

sse5 Debsld Biecib izeeee a (SP34 EET FONT OL re 
3358 022004 001062 BNE reg RETURN TO U 
3259 322006 123727 901134 occoo: CMPB == SATOB, #1 ae WE RUNNING in AUTO-MODE? 
3360 2014 801456 BEQ 15$ :BRANCH I 
3362 O22016 104401 022477 TYPE + SCNTLG :;ECHO THE CONTROL-G (1) 
3363 022 104401 922504 SGTSWR: TYPE MSW ;; TYPE CURRENT CONTENTS 

4 O22 013746 00176 MOV aiReG -(SP) AVE SWREG FOR OU 
3365 922032 104402 TYPOC ::G0 TYPE--OCTAL ASCII CALL DIGITS) 
3266 922034 104401 oe22si5 TYPE  ,SMNEW ::PROMPT FOR NEW SWR 

7 Oe2o40 ooso46 19$: CLR ~(SP) ::CLEAR COUNTER 

368 Se2o42e d05046 CLR -(5P) 33 THE NEW SWR 
3363 022044 105777 157074 73: TST8 = ASTKS :CHAR THERE? 
270 d22050 100375 BPL 73 SIF NOT TRY AGAIN 
3372 oe2ose 117746 157070 MOVB @STKB,-(SP) :;PICK UP CHAR 
3373 Meese + oO4e71& 177608 BIC #IC17?, | (SP) ::MAKE IT 7-BIT ASCII 
3375 
3355 N22062 021627 oon0es og CMP (SP), #25 -IS ITA CONTROL u? 

278 O cabtalee BNE 103 * BRANCH H IF NOT 
2379 922070 104401 o22472 TYPE  ,$CNTLU 0 CONTROL-U (tu) 
3360 022074 O62706 OodcDs 203: ADD #S. SP tS TENORE PREVIOUS INPUT 
$361 Q22100 900757 BR 198 Stier S TRY IT AGAIN 
3283 
3384 922102 021627 ocDD0I15 10$: CMP (SP), #15 :;1S IT A_<CR>? 
2385 22106 0010ee2 BNE 16$ : ;BRANCH IF _NO 
3386 922110 OO&766 ooD004 TST 4(SP) :YES, IS IT THE FIRST CHAR? 
3287 022114 001403 BEQ 11$ tT BRANCH IF F YES 
3388 Oe2il6 016677 oO00002 157014 MOV 2(SP), aSWR :;SAVE NEW SWR 
3389 922124 Obe706 OOfdOE 11$: ADD #6, SP >:CLEAR UP STACK 
3330 022130 104401 001167 14$: TYPE SCRLF 3 ECHO <CR> AND <LF> 
2291 022134 123727 001135 900001 CMPB Os« SINTAG, #1 RE-ENABLE TTY KBD INTERRUPTS? 
3392 22142 001003 BNE 15$ ::BRANCH IF NOT 
2393 022144 012777 000100 156772 MOV #100, 2$TKS ; RE-ENABLE TTY KBD INTERRUPTS 
3394 Oe21S2 o0000e 15$: RT RETURN 
3395 022154 004737 921434 1&3: JSR PC, STYPEC : ECHO CHAR 
32% S22160 O21627 oO0ce0 CMP (SP), #60 ::CHAR < 0? 


oe eee ee eee 


K 


MBINDEC-11-D2VSE-A vSVOi VIEDC GRAPHIC TEST PROGRAM MACYL! 27(1006) O2-DEC-76 17:42 PAGE 7 
D2VSEA.P11  O2-JUN-76 09:00 TTY INPUT ROLTINE 
| 3397 C22164 ooe420 BLT 18S Hoy IF YES 
| 3298 22166 O2lb2? cO00b7 CMP (SP), 867 HA 
| 3399 922172 903015 BGT 18$ + BRANCH iF YES 
| 3400 O22174 O42e726 000060 eit #60, (SP)+ AG FF ASCII 
| 3401 22200 905766 00002 T 2(SP) +: tt FIRST CHAR 
| 3402 O22204 001403 BEQ 173 : : BRANC YES 
| 3403 022206 006316 ASL (SP) :3NO, SuIeT PRESENT 
| 3404 O22219 O06316 ASL (SP) ;; CHAR OVER TO MAKE 
| 3405 S22212 006316 c ASL (SP) ROOM FOR NEW ONE. 
| 3406 Océ214 OSE o0000e i7$: INC 2(SP) : KEEP COUNT OF CHAR 
3407 022220 OS6616 177776 BIS se(SP), (SP) i161 Ih CHAR 
{ ro 70¢ ii 
3438 Reece 154481 oO1166 18S: ope QUES ti fle THE ext S 
| 3419 Oe2232 00720 oF 208 ;;SIMULATE CONTROL-U 
/ 341 .DSABL LSB 
3412 
| 3413 
S414 5 FRRRAEL ELLA ALLA LALLA RELA LEELA ELAR ALAR RRA REALL ERA LAR ELERELREREE 
| Eat :ATHIS: ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
1 ee . 
| Bu] te ROCHR ;3INPUT A SINGLE CHARACTER FROM THE TTY 
| 3418 a RETURN HERE -;CHARACTER IS ON THE STACK 
2415 :& :;WITH PARITY BIT STRIPPED OFF 
RUB ; 
| 322 022234 O11646 $RDCHR: MOV (SP), -(SP) ;PUSH DOWN THE PC 
3423 022236 O16666 oo0004 oD00D2 MOV 4(SP), 2(SP) RV — THE PS 
3424 022244 105777 156674 18: TSTB) so OST ;WAIT FOR 
Be Eee Ee vere com bie anayucti., ene Th 
3427 Oe2c60 942766 agen lata BIC ae KB, GSP) is T RID or JUNK IF ANY 
| sic8 Oeeebb Debbe? 000004 900023 CMP 4(SP), #23 318 11 A CONTROL-§? 
3453 See 105 156642 2s: ROE TKS > WAIT Lod a euaracter 
3431 O22302 100375 BPL zt ; LOOP UNTIL ITS THERE 
3432 022204 117746 156626 MOVB a@S$TKB,-(SP) 36 T CHARACTER 
3433 022310 O42716 177600 BIC #tC177, (SP) AKE IT 7-BIT ASCII 
3424 022214 922627 O0002i CMP (SP)+, bl iit IT A CONTROL-Q? 
022320 001366 BNE 2$ HIE NOT DISCARD IT 
_ 3436 22322 000750 BR 1 YES, RESUME 
| 3437 022324 026627 000004 OO0i40 3S: CMP deSP) , #140 215 IT UPPER CASE? 
3438 022332 002407 BLT 4§ : : BRANCH 
3439 922334 O26627 O00004 000175 CMP 4(SP), #175 1s 1 I A CEE TAL CHAR? 
3440 O22342 003003 BGT 4g Hs Y 
2441 022244 042766 oc0040 co0004 BIC #40,4(SP) SRR tr UPPER CASE 
B44e 022252 900002 4g: RTI TO USE 
3443 : re i ee 
= :ATHIS. ROUTINE WILL INPUT A STRING FROM THE TTY 
S446 : RDLIN :; INPUT A STRING FROM THE TTY 
3447 # RETURN HERE ::ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
stH8 # :; TERMINATOR WILL BE A BYTE OF ALL O’S 
3450 922354 010346 SRDLIN: MOV ;SAVE R3 
2451 O22356 012703 o2e462 1$: MOV Rey R3 CET ADDRESS 


3452 Oe22be 022703 Oee7e es: CMP SETTVINGS: R35 ;BUFFER FULL? 








ee 


MAINDEC$11-D2ZV 
OZVSEAR.P11 


SE-A 
O2-JUN-76 


102405 
vaets 


pape pei eas ecee 
Sabasaenes 


90 


000177 
001166 
022460 
Oee460 
000015 


061176 


(00 
047040 


704 
000040 


oo0ce4 


177770 


VSvO!l VIEDC 
:00 


090002 
000004 


009 
000012 
OeClee 


053505 


coocte 


GRAPHIC TEST PROGRAM 


TTY INPUT ROUTINE 


4§ 


ROCHR 
MOVS (SP) +, (R3) 
10$:  CMPB #177, (R3) 
SNE 
4g: Tire SQUES 
33: MOVE  (R3),98 
TYPE 
CMPB Ss, (R3D+ 
BNE 2g 
CLR -1(R3) 
YP LF 
MOV {SP)+,R3 
MOV (SP), -(SP) 
MOV 4(SP}2(SP) 
MOV eSTTYIN, 4(SP) 
RTI 
93: BYTE 0 
“BYTE 
STTYIN: .BLKB 8. 
SCNTLU: .ASCIZ /tuU/<15><12> 
SCNTLG: .ASCIZ /tG/<15><le> 
SMSWR: .ASCIZ ¢15><12>/SWR = / 
SMNEW: .ASCIZ / NEW = / 
.SBTTL READ AN OCTAL NUMBER FRO 


MACY11 27( 1006) 


O2-DEC-7E 17:43 PAGE 77 


;;BR IF YE 
;;GO0 READ 
;;GET CHAR 
es 'y a RUGOUT 
KIP IF NO 

YPE A’? 


S 
ONE CHARACTER FROM THE TTY 
ACTER 


::CLEAR THE BUFFER ANO LOOP 
StECHO THE CHARACTER 


;;CHECK FOR RETUR 
;;LOOP_IF NOT RETURN 
;;CLEAR RETURN (THE 15) 
;; TYPE A LINE FEED 


se RE R3 
;;ADJUST THE STACK AND PUT ADDRESS OF THE 
FIRST ASCII CHARACTER ON IT 


se 
; ;RETURN 

;;STORAGE FOR ASCII CHAR. TO TYPE 
;; TERMINATOR 

;;RESERVE 8 BYTES FOR TTY INPUT 
;;CONTROL “U" 

;;CONTROL “G” 


M THE TTY 


5p RIA RRR RRR BREE RARER EERE REE EERE EEK EERE REE EERE E 
;#THIS ROUTINE WILL READ AN OCTA 
;*CHANGE IT TO BINARY. 


:*CALL: 


% 


$RDOCT: 


1$: 


es: 


RDOCT 
RETURN HERE 


7, (SP) 
4,1 


IL (ASCII) NUMBER FROM THE TTY AND 


;;READ AN OCTAL NUMBER 
;;LOW ORDER BITS ARE ON TOP OF THE STACK 
;;HIGH ORDER BITS ARE IN SHIOCT 


;;PICKUP THIS CHARACTER 
ssf ZERO GET OUT 


33 #4 
33 #8 
;:;STRIP THE ASC 


TI JUNK 
;;ADD IN THIS DIGIT 








MO6 


| MBINDEC-11-D2VSE-A VSVO1 VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006; O2-DEC-76 17:42 PAGE 78 
DZVSEA.P11  O2-JUN-76 00:00 READ AN oeta NUMBER FROM THE TTY 
3503 o22602 900764 a 2s LOOP 
3510 022604 905726 33: TST (SP) CLEAN TERMINATOR FROM STACK 
3511 O22606 O10166 o00012 MOV Ri, 13(SP) :;SAVE THE RESULT 
3512 O22612 O10237 Oeeztet MOV Re, SHIOCT 
3513 O2c616 Ol269e MOV (SP)+,Re ssBOP STACK INTO R2 
3514 922620 012601 MOV (Bp) ‘RI :POP STACK INTO R1 
2515 522622 012609 MOV (SP)+.R0 ; :POP STACK INTO RO 


SSi& OeebeY O0000e RTI URN 
3si/ e2626 000000 $HIOCT: .WORD 0 : THIGH ORDER BITS GO HERE 


en ec ne = ne ee ee ee ee er 


ee ee a ee 


MAINDEC-11-D2VSE-A 


DZVSEA.F11 





O2@-JUN-76 90:00 


oe biked o000de 


022676 
022700 
022702 
022734 
022706 
022710 


111000 
00630 
016009 
oo0200 


O1li646 
OlEEEE 
003002 


O226Se 


022664 


oocoo4 000002 


VSVO2 VIEDO emt my PROGRAM 


P DECODER 
-SBTTL TRAP DECODER 


j HOHAAEAnaeeaeEaaEenaeneaeeeneeenaeenagenteesaersnnesaecess 


ETHIS ROUTINE WILL PICKUP T 


: #AND U 
?*0F TH 


ae im INDEX THRO aH THe FRAP TABLE FOR THE STARTING ADDRESS 
SIRED = HEN USI 


:*#GO TO THAT ROUTINE 


TRAP: 


;;THIS IS USE TO HANDLE THE “GETPRI” MACRO 


STRAP2: 


MOV 
MOV 


-(SP) 
acs), RO 


ROD, RO 


$TRPAD(RO) ,RO 
RO 


(SP) ,-(SP) 
4(SP},2(SP) 


-SBTTL TRAP TABLE 


;*THIS TABLE CONTAINS THE  laapableaten ADDRESSES OF THE ROUTINES CALLED 


;*BY THE “TRAP” INSTRUCTION 


ROUTINE 


$TRPAD: .WORD 


STYPDS 
$GTSWR 
SCKSWR 


$RDOCT 


MACY11 27(1006) 

















O2@-DEC-76 17:43 PAGE 79 





* 


YTE OF THE “TRAP” INSTRUCTION 
NG THE ADDRESS OBTAINED IT WILL 


‘tere 1BOP ADDRESS 
CKUP BY 
Hon RIGHT BYTE OF TRAP 


:;MOVE THE PC DOWN 
::MOVE THE PSW_ DOWN 
:IRESTORE THE PSW 


TRAP+1(104401) TTY TYPEOQUT ROUTINE 
NUMBER (WITH LEADING ZEROS) 


8 
TRAP+5( 104405) TYPE DECIMAL NUMBER (WITH SIGN 
TRAP+6(104406) GET SOFT-SWR SETTING 
TRAP+7(104407) TEST FOR CHANGE IN SOFT-SWR 
TRAP+10(104410) TTY TYPEIN Oe ROUTH ROUTINE 


TRAP+11(104411) TTY TYPEIN STRING ROUT 
TRAP+12(104412) READ AN OCTAL NUMBER PROM TTY 





BO? 


MACY11 27( 10063 


pian 
| 
| 
> 
| do: 


II MESSAGES 


S 


[EDC GRAPHIC TEST PROGRAM 
REC 


VSvoil Vi 


Ue-JUN-"& 90:00 


“li-D2VSE-R 


NOE 
VSER.EL 


a 
- 





/NO BUS RESPONSE FROM A CHARACTER BUS REGISTER ## FATAL ERROR s4/ 


rt 
= 
ow 
o 
i 
a. 
=: 
al 
mM 
, g 85 : 
‘ ee a a a 
«4 QO aw Qa oOo ~ 
~ ta) tad a qe Q 
~ ool Pe Qa Oo 
uw ta) @ ta) ta Qa 
1 74 wn ta Qe 
tas w be - ac tals 
w ~ cx w a ta) 
> aQ on ~ e- Q 
ts tal =x Ce | a Qa w ta) 
Q ; <a S as a a a i 
Ds ae: a Ms > fs GS wn 
-« uw) - w a =<. a «cs 
1 wm w as = | tas ~ ta) 
@ we a e veity hom mS 
x Q oS — z = = . 
a 2 © th ~ nH A . 
: = & a ti fd “ “ 
iY) = w © oO oO sg a 
ule<« -@ ~) a et o-4 = _ 
ty us a © - e * 
rw Ca Im co) x tla ta) o-0 oe 
ule iw bf © > > q wo 
is ~ SS es Me ~~ 8 ™~ hs ~, “~ 
ae wi? SN ON 4 ty N oN rw Ns 
oer > «> £90) «> aq © [=] oO « [a 
ow >W ww w wm w ¥ wm wm mn 
per as «e « « « « « « 
a Be uC 
ra S 8S . 
cae - ££ 2 oh z 2 S 
o- > >> la) ta tas tw tal tal 
a fe Soeeeegee se BTR ne & aeEhy aay pe ees bt 
rie Fs ray] 4 -<U-<« Sl -_ 
ina ya wie eit zene Z2e PeeReT oT SSe 
canis ENON BR Rae pinnae Site 3 SYSY NPY APSKNANeANA 
oe Ebar a hits eat a aa ay aiaian Bute Base ge soiae rs 
Poe atin ZZ ae Bans Wine Were aes 
a 


rate} 
RGus a 


Ree Sd aee Gears 4 sneenaaeneene ee 
a 


mm me a ee rm ee ee Se 


ae 388 
Sinha 

TURE 
Se 


O-UMT wor 
ee ee eer) 


BHHABRBIHH 


is 


SIsoNy 
fy teary eae 


toto -4 oo ease 


tis -oomm Zayas 
ae a gsttasta ataat au ence 


da gait reais Poaae 


A ata 
INS SENTIMENTS INS 


mm me re ie en te a a ee 


MGINDEC-11-D2VSE-8 
D2VSER. PL) 


3618 
3619 


21 


ee ee ee me 


VSVO1 VIEDO GRAPH 


Be-JUN-"6 00:00 


020120 
paesey 


O47Se2 


beictine 


if 


rh 


glee 
ae 


RRR RAR 

ERE 
RARE B 
Eee 


R2RZ 
& 


Fiitetty feet at 
atest rat 


054105 


ARSE 
BPYSE 


au 
g 


RP 
ze 
anne 


ASRS 

RERRY 
2 
ze 
oO 


m 
oO 
-_ 
Tw 
iat) 


027120 
3505 
Clee 


fo 
—— 
2h 


Ue b= 0-- 
a herbertantany tf 


OS4111 


ARAB ? ZAR 
piasturstce tare toh a ts 


B BS5e 
on PRN 


OS2040 


~ 


Oo 

8x 
-“~ 
-— 


ite 
Ruswnere 


PARADA 


e2R2928 BAHT 
RENARBS Zoe 


ne 


oOo 
oO 
¥ 
an 
c 
Ww 


EM10: 


EMI1: 


EMle: 


EM17: 


DHI: 


DH3: 


fr FT 
avi 


CO? 


EST PROGRAM MACYI1 27(3006) O2@-DEC-7— 17:43 PAGE 8: 
ASCII MESSAGES 


-ASCIZ “BIT MAP P.C. INCREMENT ERROR’ 


-ASCIZ “WORD TEST OF PIXEL BIT 0 ERROR’ 


-ASCIZ “BYTE TEST OF PIXEL BIT O ERROR 


-ASCIZ /CHARACTER READY ERROR / 


.ASCIZ /BIT MAP READY ERROR’ 


-ASCIZ /“PREVIOUSLY EXISTING BIT MAP DOES NOT EXIST NOW 


-ASCIZ /PREVIOUSLY EXISTING VTVO1 CONTROLLER DOES NOT EXIST NOW 


-ASCIZ /ERRPC DEVICE ADDRESS THAT CAUSED A BUS TRAP/ 


~ASCIZ /ERRPC vCCSF G00D BAD.’ 





DO? 





| MBINDEC-11-D2VSE-A VSVOl VIEDO GRAPHIC TEST PROGRAM MACYIL 27(1006) O2-DEC-7e 
 D2VSER.P1L — O2-JuN-7e 00:00 ASCII MESSAGES 
3674 O24ObE 041526 051503 od4Sz2 
3675 O74 547507 C4211? 04101) 
3675 id2 42101 ooo F i 
77) «Oe4105 105 OSli22 oO41520 DH: ,ASCIZ. vERRPC VCCSR TIMEL TIME2 
378 Oo4li2 oOS3011 941503 O51123 
3679 024120 OS2011 O46511 930505 
Deriee 052011 O46511 031105 
} 14 050 2 t aA 
924335 10S oOSi122 o41S20 OHS: LASCIZ VERRPC VCCSRY 
3683 24142 053011 O41503 051123 
3684 24:50 000 per! 3 
2685 95415) 105 051122 041520 DHE: .ASCIZ -ERRPC VGCSR GOOD BAD’ 
3686 OS4156 053011 O41507 951123 
3687 24164 043411 047517 OO4SO4 
3 024172 o40so2 o00i04 Z ; 
38S O24176 OS110S OS0le2 SO2 OHIS: .ASCIZ /ERRPC VGCSR/ 
3699 24204 043526 051503 O00lee2 . 
3651 Devel2 OS1105 950122 S03 DHl6:  .ASCIZ /ERRPC VTVOL/ 
33 de4220 952126 030126 o0006) en 
3694 O24226 001116 O01:26 O00000 DT1:  #S$ERRPC,SBDDAT.O 
3695 O24234 OO1116 O01446 001124 O73:  SERRPC)VCCSR, $GODAT,$BDDAT,O 
36% O54 091126 906000 
3697 O24246 OO1116 OSOL446 OO1SIO DTH: SERRPC,VCCSR,SAVEO,SAVE2,O 
3698 924254 9001514 900000 
3695 O24 GO1l16 OO1446 OO0000 DTS:  SERRPC,VCCSR,O ‘ 
3799 O24 DO11!6 OO1460 O01124 OT&: SERRPC.VGCSR;$GDDAT,S8DDAT.O 
3701 Oe4e74 001126 200000 
3702 024300 OO11I6 OOL460 O00000 DTIS:  SERRPC,VGCSR,O 
3703 S24 001116 901120 009000 OT16:  SERRPC:$GDADR,0,9,0,c 
2704 024214 9009800 909990 a90000 
3705 O24 509 990 905 oFO: .BYTE 0,0,0,0,0,0 
370— 924325 009 09 900 
3707 Se4330 090000 SUFFER: 0 
375 909602 “END 


EO? 





vSvo: VIEDC GRAPHIC TEST SROGRAM MACYI1 27(1006; O2-DEC-7E— 
:00 cross REFERENC E TASLE -- ieee *sugtre 
l2is 234 27s 332 34 335 3% 237 
34 zr 
234 27s 
2a4 248 
234 
E34 
234 
234 
24 
234 
234 
234 
234 
234 
e34 
e34 
es4 
e34 
234 
234 
234 240 
leds 234 27& 625 
234 245 
234 e4é 
e4 237 
234 262 
234 ebb 
234 23 
224 eve 
234 256 
eM 264 
~ eb7 
234 270 
234 ete 
e24 ey 
fn J 
: 4 55 
34 cts 
224 268 
234 271 
234 239 
sS3 eat 232 
3338 3296 33388 
47§ 323278 
3230 3298 33398 
234 247 
224 238 
224 24) 
e34 248 
lees e234 273 403 404 
234 274 
147 4418 e448 31392 
itts 735 1352 1401 1468 1547 2772 
Sta 10 
Ss 105 





cn ma er 








scetaaltelealcsliclia) 


| MAINOEC-11-D2vSE-A VSVOL VIEDO GRAPHIC TEST PROGRAM MACYLI 27(1906) 
OLVSEA.P11 | Oe-JuN-7é 90:06 CROSS REFERENCE TABLE -- USER SYMBOLS 
1To2 = conon4 8 104 
1T53 = Oo0010 628 «153 
TTd4 = 900050 G53 102 
TTOS = 090040 ie 101 
TT05 = 0001 Se 100 
TO? = 990200 958 3S 
i7ds = 500400 898 $8 2905 
?7O8 = 901000 S78 97 
ITi = on000e 1058 2446 
ITio = 502000 Sos S41 894 1220 1285 1376 1415 1416 1428 1443 1592 1609 E28 
1651 1673S s«389S)s«dW7e8~=Ssdi75S)=st7Be)=Ss«sweO9)=Sis3S)Ss«siste «= ieedSiSig «= 1542S $58 
1936 5923 «= PONSsi«‘i7GSOi2103—s—«‘i3G—(ié‘iSS SOCBBD «0s 20S «S235 2S 25] 0S 2293S BS: 
EITi2 = coMDO0 BSe «= s«agS3 ey i074 1364 415 i418 1428 1443 2254 2297 2232 236: 
2 237223934204 GSC (tS SEI? =~ o x 
BrTie = 010000 oie Bes 34 1087 iste 2233 246s 2618 2698 ere 283: 8H 8S 
ilj = c B 7 } 2702 - rg ~~ 
iTid = ett Bs; S08 eee eka ake 
SITIS =} Sis £03 5 512s Suz su? s«SS2 S71 S75 581 eco Sg 
69 E 34 e390C'si«ititiéP 360 31 #41458) «1468S 88)Sisia77eCti«DT PD 
- 2835 2837 
lve = 1048 
173 = 000010 1038 
ity = 5 1028 1837 
Ivs = 40 idls 
TTE = 000106 it6e 1525 2586 2799 
TT? = Dco2o0 $98 1485 [538 7 es ‘ 
'T2 = So0400 $ée 1326 1389 1415 1418 1428 1443 1592 1609 1636 i858 1689 1792 
i72e0«175S)s—«d'7S2=Sfs«édSOS~=Ss«éd83S)=SssSbe Sitges «1816 «= 42S kes = i83G = 2032) 2045 
507 42 B103.-—«‘éB130's—«iSS)=Ss«lB2 40s ops «= «eS)=Ss2S1)2=Ss 3293s «S332 03S) B72 
2393 «2420 2443. N4RSsC213—ts«éGI 
279. = po1900 raze N59 148 NSH 2593 
i = 
BRIAN 917504 2814 28188 _ 
| BUFFER 24330 1172 179% 1186 1202 1224 1262 2533 2558 e570 2779 37078 
BURN 15 W3le 49439" «= 44x «= S3]—Ss«dH?~—s«d1S73 
00:5 151 4398 
USOLT Ol641& 152 bese 
EKSUR = Toaune Teac” use 2619 -«e703S««BB90.S«iS]«SCBS31S«BASH 2ST 
C = 10449 2 2 3 
Flemap 016224 i322 «= 1S86~Sfs«aSO7)~=Ss«éddeem)~=SsidGSO)~Os«éd@)=Ss«éddSSHSsC«édT7S':~«Ss«sT742~—s«a769 1s22 1949 
1876 1903 1929 1955 1983 2010 2036 2963 2090 2117 2143 2169 2195 
. Pep2>ssBeygsisiéiGC 5360 «-Ba710SssadeSts«é} Buses BE GE Irs Be 1s 
NTSAV CLS7ES 249S* 2508# 2517 2519% 25218 
Coax  ogisso 4338 «104S" =«=«1575 
60 OO1E4E 43290 S17# 0 sSSbe 40 SBS# = G14R = OEN3® §«=6:1049~—SsS75 
CONT. 001576 44g ti«éCUD 
COUNT 015676 920 922 2498 2518 
COUNTA 81567 $18 977 1010 2495s 
‘es = ‘DODDS big 3274 «= 3284 
CRLF = 90200 55g «(3545 0S 3084 
Cross  Siseue 149 Bugae 
SCATET 75 11688 
GCONT  O16002 2272 2279S SPS 
OCISP = 177570 Ey aC ras 
CELAY DIGeES 1050 41061 1078 1095 i117 1225 2149 1157 
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1] "BS-tune 22:56 CRESS REFERENCE TABLE -- USER SYMBOLS . 
IM? «1NB].s«1S7BO«SSMH=—s1G1D.-Ss«1BS?—s«sSSO ~=s46B1«=«s«1703-«s«a1720,s—s«7S7~—s784 
fey lees 185] Sle Sv) i57; 158 Geka ELE? 
: 319 ae so (33 33 5334 333503363 (iaSSSEC«*éESEGC(i«éSSG 
gi83gi8 Sse SEE CSSE «= 553] SEGEO*SEGrg «3577 
903349 yar (HC SSC‘( zk OR 
aggee2 633 bSoe 
SO206e 5358 
BoSzi5 cj S348 
ARSyaG cease 
Bosece 2g28 
poste Sete rap S$ 935s 1298) 1299" 139 
504365 71s 7928? 29 12988 » 1303 
BSusss 303 308—i(‘ zk OC StC(‘“ SSS OS (SC (LCS? (atiaNSCCOE 
321 «387s 370Se 
924004 3300230838 
054175 373 (389s 
eNele 75365 318 
Su5c8 3:3 36738 
Aba ae 315 37Fe 
Beui3e 325 36828 
O54151 330 337(iHQs—(iaH( (iS —iiHLSC“(<té‘iE:CO#*«C2EOS 
LA OO1L4eE 24s 4o6e% G74e 914% 2934+ 
PRE 000174 lade 434 
Y 615970 2568 2275 eBg2eBE CRS 238 
139595 ee ee 
326, 38130736848 
acta 3740-27028 
654306 380 386 «= «27038 
SS4234 31336958 
Sug 3159 (36978 
BSusee 335 95% : r 
uBEE 31 “338 34 350 236 2 38 237008 
73 i> aaee 
BG0530 les | 459% 04S ua 
30 595 -35778 
AS34325 $43 S228 
nesues 345 Seve 
Dease4 364 538 
oesce3 3036308 
OS3e11 366 «3723648 
053636 378s 
ASa7 14 304 (este 
523133 305 3628 
953214 311 35978 
OS 3564 317 36038 
922350 332 (36078 
023336 335 e128 
023374 336 «(36178 ms : ; a 
S60004 ioSe «G2si‘éw SCS )OC«GGQROCdGSTH® «= s708a)s707# «077080 7Sle «0782s BG2Ge 2897 
j 2696s 2900" 2903+ 
016132 Ilil 49 «BES 7g 
O1e076 1094 © Beug 
ie322 S09 BEDS 
tel iS 1ie08 1184 1199 1207 
poe4ze 11e@ «11928 
geeese i 143-3605 «s«3SEDOsSSl«=CSS2 «0soSS9.s«SSS «SES? )«=— ESE «= s2SSsC2EEL 
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CO CROSS REFERENCE TABLE -- whee SYMBOLS 
24498 
es4s 24s2 
1106 1315 1136 1138 1:51 1187 i210 1219 L2gé 27778 
3243 84 
ySle 452% 
S68 
2s4s 
lide iis4 2574 
125&8 
1756 1783 18i0 2836 1863 i899 1917 1942 1970 1997 20es 2csc 
£104 ei3l 215& e183 2203 e236 22308 
3278 2284 
25708 
$38 5&7 S5S¢ 62S 7368 8 =61314 2441 eis 26i9 
2414 27178 
1631 1653 i$? 1697 I71E 1743 1773 1797 1823 igeo 1877 1304 
Le 1984 2e0i: £037 2064 2031 2118 2144 2178 2196 2223 2323 
é 
e7See 9 2796% 28228 
13068 e433 
212 1333 13448 
1310 
1329 2444 2614 
le44e 1247 
12438 
230 123i 1235 1237 1238 12508 
4BOe S03# S08* Slee 513% S14 524 
483# S428 S47% ccis oS2% sS3 559 
484% 71% S7b# 580s 1# S82 588 
485% 600# 605+ 603s 510% Sil 517 
486% 629% 634% 638% 23+ 640 S46 
c77S8 
c7ths 
13518 
1722 1749 1776 1803 1829 135 1883 1310 193€ 1365 i390 eci? 
070 2097 2124 2149 2176 e202 2229 2720 
le06* 27638 
24 
21978 
4n7# 4S8* 3159* 2160# 3169* 3175* 3187# 3188+ 
3558s 






| MRINDEC“11-OiVSEon VSVOl ViEDO SRAPHIC TEST FROGRAM MACY 
| COVSER. PLL O2-JUN-"6 00:00 CRESS REFERENCE TASLE -- nSeR 








| ROLIN = 1044211 3495 35558 
| RDOCT = 104412 35608 
| RESTAT 902060 482 4Sie 683 
| RESVEC= 990015 1158 
RETURN OO73E6 tk |) |) Sn 7-1-2 ec CT | 
| SAVED 901810 wi?e Seis ges 932 34 3697 : ; F : 
| SAVEL 901512 4188 $12 514 ssi 53 8 592 609 611 £29 £40 720 
| SavE2 o01514 4198 9238 324 Sze 938 3697 
| SAVE3 90151 4208 1014* 1015* 1016 2 fe 
| Ser 037359 L1i?l# li?7*# J1Bbs 1189 i19s* 1197 2762 
STack = 901100 148 6449s 609 = 225 
S7c 7o252¢ 4e5e 1107* 1110 ilele ile2 11378 LIA! 11528 1154 
| STKLMT= 17777 
| Sum 503140 2138 447 upSe 4&7 u73% “sox 1055 1072 109: 1104 1334 # wes £1217 
1581 1602 «1624 «86184680 saBSBBSB9CSCsi‘«dL7'2B—“C“‘<‘édt7#S:«OCOCL7EE = s1793,'s«d1819SsL HE Ss«1872 
1800 1926 #1983 1980 2007 2033 2060 2087 2114 2:40 e166 2192 2215 
| 2246 0S seB32306 = 2326S SH? EH 2399.SssB4iO-—so4B?)0—2620 0s 698 )0=Ss378E OBESE 
e 2908 2908 2939 2951 3167 3180® 3351 3398s 
| SWREG  O0C17& i458 ? 3351 3364 
| Sw = Ol 788 
' Sw0O = 900001 £8e 72 
| SwO1 = 000002 678 ? 
SwO2 = 000004 bbe 76 
| SWwO3 = 900010 5S 
, SWOH == 900020 648 74 
| SWOS = 900045 £38 72 
| SWOB = 000100 628 72 
SwO? = 000205 Ele 71 
' Swoe = oo0409 £08 70 eo 
 SwOS = 991000 598 63 1581 1803 1824 184% 1668 1690 i712 1739 «61768 1793 © 8=61819 
1946 0—Ss«1G7 1300 «=s_-«:1926 1963 1980 ©6.«s BOO?) Si233)sieBOCiF C2114) =H BLESS 
yk 2192 = 219sBGSC“(<i«éi‘i CDESC? 8B 89S 24H10 
| SWi = 900002 77% 
Swic = 902000 See i055 1072 #1091 110% 1134 1165 1217 
' Swi2 = 004000 578 
' Swl2 = 010000 cee 
SwWi3 = 920090 cS 
| SWi4 = 040000 cus 
twig = 100900 528 
, SWe == 000904 76% 
| Sw3 = = 000019 75% 
cwH «= 900020 74% 
' SWS = 900040 738 
Su& = = “900100 728 
/2 = 00 718 
Swe = = ~O00400 708 
| SW3 = 001006 698 
| TABLEL O1b446 2325 26338 
| TABLE2 O16466 1718 S 1772 #1799 2172 2198 2225 26398 
TABLES O16506 1590 = s_ BENS 
TABLEY O16526 1633 cS so1G77—Ss—«*1:68989 
TABLES C1ESHE 2419 = 26578 
‘TABLES Ob 1825 So 2s«1679~—Sts«é1: 908 
TABLE? O1bb26 1932 41959 1986 2013 
| TABLES OLGE4E 2039 «2066 «62093 2120 
 TEITVE= 900014 lls 
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111S* 11208 = 1140 11478 
7o0e 799% «= Bs 1296 


701# 702 7ié 7eG 
722% 725% 726% ree 
1626 1648 1670 692 


1 258 
6 64S 7648 


112% 
1297# 


02-DEC-7E 
1306% 351 
796 801s 
1741 1768 
2083 116 
2412 27868 
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KO 


MACY11 27( 1006) 


Oe-DEC- 


7& 17:43 


PAGE 90 
2989 ©2992 
3390-3409 
es2 gg 
97x _ 966% 
ygse 2498 
2706% 
1657* 167 
1989 2016 
25284 726% 
2291# 23108 
2612%  2616% 
1378 1389 
459% 1460 
636% 651% 
1804 1809s 
1969* 1991 
eiso = 2155 
313% 23328 
25238 25253 


e334 
3458 


894% 
99g% 
2537 
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noveEA Pil : O2-JUN-76 90:00 ‘ : cROSS REFERENCE TABLE -- USER SYMBOLS 
j o14 998 746% 756% 1352% 1355# 1505# 1523# 15462 i550# i634# il656# 6788 1700s 
a: ge Fe0s 1747 1774* 1801* i827 i854* i1881# 1908*  1934« yt 1988* 20iS# 2041s 


edges c2095# e2l2e# e147 el73e 2195 eeebe e4S4#  eSe4s 
423 115e li il 2 


| VHO o01s24 # 1109 1120 1149 71 83 2550 
VH1 001526 424 1225 1243 1261 1273 
VTHDR1 922750 712 35688 
VYTHDRE 922774 715 =. 38728 
VTHDR3 O23002 719 =: 35738 : 
WIDTH 901522 =2E 1143 2557 
aS a hn 
XPRNT  (O16032 1113 1145 1204 1256 1285 25338 2551 2780 
XPRNTA O16036 25348 2815 
YADDS 91714 1185* 1200 
YHATR 001540 4298 1081 
SAPTHD 001000 173 
SASTAT= xeeKRE UU 3318 
| SATYC 021530 3289-32918 
$ATY1 021504 32878 
$ATY3 O21512 3233 ©6«-: 3288s 
SATYY  O21522 2347 s_«-32908 
SAUTOB 001134 2108 3359 
| $BASE O0124E 2754 
| $BDADR 001122 20S 
| $BDDAT 901126 2078 S2ex 
Bis* B16 
' 843% rose 
897% 907% 
926% 937% 
1391% 1392 
14S6% 1460% 
533 1556 
| $CDW1 o01252 2778 ©. S0ex 
1298 1315 
| $CDW2 001254 e788 
| SCHARC O21500 3250* 3260 
$CK 021752 33518 3557 
| SCMTAG 001100 19380444 
| $CM1 = 2258 2s Rbk 
, $CM2 = 000004 22S 43s Bb 
| $CM3 = 000002 2238 
| SCNTLG 022477 3362 ©6345 8 
SCNTLU 022472 3379s 3Y748 
| SCPUOP 001220 249% 
| SCRLF 001167 228% 2942 
020772 3111 3145 
| SDEYCT 1202 2408 
vM 001250 2768 $07 
SOORGN 003314 666 75 
| $OT 020762 3114 31498 
AD 093304 1593 677 
SENDCT 003252 459 6688 
3323 670 6858 
SE 3320 673 6B4e 
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nie BS isistetete 
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rune 
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3329% 
3307 
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2938 


2856 
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33334 
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2864 


2973 
3474 


287548 
23915 
1400% 


2911 


3326% 


2961 


2976 


621% 
767% 
881 
107S+# 
1401% 
1476 
1565* 
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DZVSEA.F11 O2-JUN-7— 09:00 CROSS REFERENCE TABLE -- USER SYMBOLS 

SMTYP4 he 2718 

SNULL 1154 2198 3255 3284 

SNWTST= Ba081 7618 7848 3368 8494 8618 875% 8898 9008 9138 Ses 9698 10028 10438 
10668 1085# 10988 11288 11598 leli# 12918 13608 13728 i3848 13968 i4lis 1423s 
14388 14508 14988 15178 15418 15698 15978 16188 16408 16628 16848 17068 17338 
17698 17878 18138 18408 18678 1894s 2608 19478 19748 20018 20278 2054" 2081s 
StH 2134 el60e e186% eel3#  ee40s 27s e3008 e320e c3tle ec3sbee 23838 c404e 

SOCNT 920552 3042 3071% 30848 

SOMCDE 020554 2037%  3041% 4 3049%  3060% 30868 

SOVER O0e2 2893 2904 2309 2314s 

SPASS 001200 2398 477% 510 S49 578 607 36 662% 63% 7 84 710 1053 





2387 409 2408 
SPASTM OD10 183 
| § 021142 31928 
SPWRON 021002 4S? «31598 3187 
SPWRMG 0211 31908 
Sore rete 3359 aur" 3284 «3409S 345823474 
8 
SRAND 017604 1180 1192 28Sis 
SROCHR 222 34228 3558 
= £EZERE 3561 
| SROLT 022354 34608 3559 
| Hata 022526 34908 3560 
S2 = 000010 34438 
001160 2238 
| SREGO 001162 225% 
| $REG1 01164 2Pbe 
| SRTNAD 003316 6838 
= R£HHHE U 3561 
| SSAVRES xeexee LI 3561 
| $SAYRE OP1152 3168 3176 3177*% 3178 31968 
| $SCOPE 017706 451 e898 
| SSETUP= 000137 sii 3430 451 453 4ss 457 4s9 460 661 2890 2931 2954 2956 
| $3 TUP = 177777 441¢ 
| SSvL A : 920090 2901 2907 29108 
= # 
| gel’ = rterte lt II 130 131 132 133 134 135 227 460 461 656 662 
| 676 682 684 765 788 40 a53 865 977 993 904 917 46 
| 973 1008 1047 «11070 1089 1102 1132 1163 1215 1295 1364 1376 1388 
14900 1415 1427 1442 4S4 oo i621 1845 1573 1601 1622 1644 66 
| 1688 1710 1737 «11764 #« «51791 1817 1844 1871 1898 1924 1951 1978 2005 
5031 +2058 «= oBS)«SsiBll2)=Ss«2138)=Sss GY «= s2190. ss e1?)S ss e441 «= 30H )=S 2324S HE 
3366 2387 2408 2433 2883 2884 2885 2892 2904 2906 2907 e910 2913 
| 2917 2924 «= «9PS)—siGPhCti«GP7?~=—s«293S)Ss—si2939)0Sss«9S1)Sss9SS SH ~Ss«319 
—S$SWREG 001214 2478 480 
$SWRMK= OOCCOC 135 136 2885 288 2908 
pe ey ce ait Mk a ae ee eee 
STEMPO 901476 4128 
§TESTN 001176 2388 2911% 


STKE B01 4 el6e 3344 3355 3372 3426 3432 
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| MBINDES-1i-D2VSE-6 VSVOL VIEDO GRAPHIC TEST PROGRAM MACYL1 27(1006) O2-DEC-7& 17:43 PAGE 34 
| DevStes. Pls Ge-JuNe™e 90:00 CROSS REFERENCE TABLE -- USER SYMBOLS 
rks cis E:Se 3244 3383 3363 ts 3424 342 
Ny oe Dolo is ll rel ,eSs 784 gee 80 836 84o8 S46 84s esis gceE 
861 stSs 87 873 8778 88s 8928 89¢e $c3 3048 $19 $i3 3178 
yz 368 369 3738 g 933 1002 100é8 - 10478 1054 1CSE 
i 1066 13708 861071 10 1908s 1089s :c90 103e 1098 1ldes 1103 1105 iles 
{ lises 1133 i3s 1159 l1i63e 8 1164 1166 i211 lelS# lelé 1218 1291 1295s 
| 1388 1368 13648 1369 372 13768 1381 1384 1386s 233 1396 14008 861411 
| i4iSs 2s} 1423 14278 14 438 15° 1447 145 i4548 i4#ss 1498 1odes 
| a 3S a 3 2 
lg2ee lESes 
i ié 5 ig li $78 iy 1g 1733 igSe 1988 17490 1766 iSEde L7E5 
' 1767? 1787 17918 1794 1813 18178 1818 1820 1840 16448 #81845 1847 
1867 le7ls 1872 1874 1899 1901 19248 8619, 1527 1347 
iSsis 195e 1954 197 19788 1979 1981 2001 eccss ¢20 20 2027 203is 
e032 2034 20s4 ecses e 2 2081 e0ess 6 2088 2198 2lles 2113 
211s 2i34 21388 2133 2141 2160 elé4e 2165 eis? } 1908 e191 2133 
eel3 eel7s e218 ce 2240 ees4e =e2hs e247 ees? 22618 2b2 2264 2300 
23048 2305 2307 ese48 2325 2327 2341 essSe 862246 2348 232 235&8 
Fe ae 2367 22693 2383 22878 2388 3390 2404 e408e 240s 2411 2429 e4328 
STPE  =s._:« 90.1 1Se el8e 32738 3284 
1 $TPFLS 001157 2228 3222 3284 
| STPS 001150 2178 3271 3284 
STRAP 022630 4 3$26 
| §$TRAP2 O226Se2 35378 354 
STREP = 900013 2418 35508 35518 326528 35538 3554s 3555 35568 3557 3sS8e 2559s 35608  35éls 
| $TRPQD O226é4 3$31 35488 
S7ST™ 901004 1828 
$vsr! 00119¢ 13S8 5188 oS7# Sets 615+ b44e 6$i# 1358# ea 28Se 2908 29ice 2911 
4 2514 2317 2334 1 
STTYIN 3451 3463 34738 
$T = eeeeee 3558 
| STYPOS OSsé 20998 S3 
srvre O2leee se2zee 32315 354) 3543 
$T C Del434 sceSe 3266 se7is  327e 2335 
| STYPEX 021502 3277 3 3e828 
$T 020354 30408 3559 
STYPON 020370 320393 es 3652 
| $TYPOS 020230 30358 3551 
SUNTT 001204 e4ls 765% 794% goc# B4O® {301% 13078 2795 
| SUNTTM 001016 1848 
fect: Spies S733 749101 
eeu eo 
SVECT2 O01e44 e748 
SXTSTR 617722 26958 
$$SET4= 6768 
SOF I Oe0ss3 3036 3040#  305C 30858 
SSOCAT= aeecee ge 2941 
= 024322 1298 1438 157 1588 lée8 l638 169 1708 172s 174s 1928 230 
448 460 684 is} 2917 2361 30088 31538 217i 3:95 3e04# 3284 33358 
3344 34738 863474 3480 
-BASTA= seeeee U 3c88 3231 
Sx = 001900 1698 174 


ee ee ee eee 
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MAINDEC-11-D2VSE-A VSVOL VIEDO GRAPHIC TEST PROGRAM MACY11 27(1906) O-DEC-76 17:42 PAGE % 
| DIVSER.P11  Od-JuN-7& 00:50 CROSS REFERENCE TABLE -- MACRO NAMES 
COMME! leis 
BEiaY 436e 1496 1127 1128 1149 1357 1208 1257 128 1gS4 1837889 ise) 1703 1730 
ves TSaG (a7 i} is4y «97 3925 = NS 76 «BING =sBL 32 
es ATES EIA «SHC 28S Rk RHE ahead: AREER SSES 5S ESS EAE HE 
53920 B4G: «= Bu 
eft; Sie els 
-_ De ‘ j 2 & 
Faes8 se $1 see 529 585 Sl SY 590 613 619 G42 648 778 831 647 
a aru (tiECiEBCCHRCC“‘K?:«=«OC«*dKO]:SCi«dRKDRE:C‘<i‘«iaGG:SCi«iG7D 
S332002««33050 sd? sgdeg38i«iaCgE GPE OGstesSss&Sti«dTS):«Cié‘éESS:C(<é‘aEN;:*C*C*«‘*TERES 
ss eSOHSs«BSi3— GOD 
ESCAPE tie 
FTxADX 4958 456 53S S&H S93 ~ 622 
SETERI is leis 
SE 7SuR is i3i8 
HOME u3Se «109301208 «301192261139 
INHOS «6=s«i«d43GeCO1E7BOC3EG14«=s«dlbe2 SCG sé 
1924 «1851 «1878 += B00S)«S 2031 += Base 
: $354 E345 «3366 = 5387 = BYE 
INHID «64398 «1OSS)0SsitvO.=SsCsiea~SsdMOBSs«iLLLBPVP 
fapIn 4368 
LOXLIN 4368 1729 1756 1783 1810 1836 
mr ROH, LBL 21562183 2208286 
4 Ley e ei 
NEUTST Je «so S3ls So 71ss784siB3KCCéUG 
1086 «0108S Sss108@)~=sslepa@) 0 atS9—sBL 
i498 1517 Sur 3669 1697 1618 
1967-1894 = 120, «1847, «1974 = 200] 
b 5257 8300s B300—sB341s BEB 
POP ls leie 2270 3140 3180 3181 
PSH : lels 285: 3099 3161 3167 
REEORS ie tele 
SCOPE ibs «So 764——(‘7B?::téi‘iSCS]t«é@K 
1068 1101 «1131024124 
1529 «644 =—Sis«éaS7B = CdEOO =O Céd621~—Sste3 
ies? 1523185019 2004 30 
2302 «2325 «2344 BES 286 BHO? 
SETPRI la lels 
SETTRA 35438 3650 3551 3552 3653 3555 
| SETUP ls lels 442 
| SIP ls i218 773 gu «ase 
ee8 2899s? «S037 s«10S4)—Ss« 1056 
1i66 «6s. 12i6—=i(ié‘at21SCti«dMLS «Ssid'3EDSs1BL 
149 1506 1634 1639 1559 1580 
62 16891691171, s«1713'—Ss«17 
ie72(«die74)=s«ge9S)=Ss190t)~=S «1925 ~=Ss«1:937 
2061 2086 pose 2113 2115 2139 
ee * ee ee ee ee es, 
SLASH is i2ls 
SPACE léls 
ET pee le jie 158 8606166 )0ClCtiti«i‘«d‘S 
£36 | nn 3 81 863 873 
8 $71 1002 1004 1043 1045 
1161 1211. «1213,Ss«1291=Ss«a1293)~—Ss«1360 
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| MBINDES-11-DIVSE-8 VWSVOl VIEDO GRAPHIC TEST PROGRAM MACY11 27(1006) Ce-DES-7E 17:43 FRGE 97 
| D2vVSES.F21 C2-IUN-7E 00:00 CROSS REFERENCE TABLE -- MACRO NAMES 
17s? 178s 1813 1815 1840 1842 1867 1863 1894 1896 192e2 1322 1347 i349 1$74 
137 £991 2003 2027 2023 20s4 2056 0s! 2083 2108 2112 £134 213& eise eite 
2186 213 e212 221s 2240 ec4e es? 22sS 2200 2302 2325 esee e341 cesta 2282 
2264 2382 ccs 2404 24Cé 2429 2431 esse 287 2920 2964 2012 20893 2157 2173 
. _. Sie "mals 334é 3414 3443 3482 2520 
e ee6 
TESTI 43S5e 1583 1g05 1S26 1648 1870 1632 1714 174] 1768 1795 1822 1948 i1g7¢ 132 
1528 isss 1982 2089 2035 2062 2085 elle 2l4e 2168 2194 z221 2248 2208 es28 
' Ex 2370 2231 2412 
TREMTRE SS41s8 
TYPSIN ls lZis 
TYPDES is lels 671 
TYPNAM is lels 
TYPNUM is lels 
veocs is l2is 
TYPOCT is leis e976 3000 3364 
TYPTXT i@ 1218 
| SSOMRE 18&e 225 226 
| SSOMTM igts 
SSEScA le lzls 
SSNEXT is leis 7é1 784 836 Ses 86! 973 egg 396 313 Q42 3€3 1082 1043 
he 1285 103g lies 1159 lell 1291 1369 1372 1384 12% 1411 1423 1438 1450 
14938 1517 1541 1569 1897 1618 1649 1662 1684 i70€ 1732 1760 1787 1813 1840 
1867 1834 1929 1$47 1974 200i 2027 2054 2081 2108 2134 2160 else 2212 2240 
al ees? e200 2220 2241 236e 2383 2404 2429 
$SE7 3S4i8 3550 3551 352 3$53 3s5 3557 3558 3559 2560 
SSSE™ 4778 
S$SSKIP l218 cs eye gsg 87’ eos 310 963 73 
its i032 1103 1105 1133 113s 1164 1165 lelé 3 
1447 148 1$80 1S 1602 1604 1623 S 1645S li 
1713 1728 1740 1765 1767 1792 1794 1818 CO} 
2925 i3e7 1352 1954 197 1981 2006 e 2032 13 
2115 £138 eli e1ss 2167 218 2193 2218 e220 07 
EOUAT as sos i est eae 2267 226 2388 2 2409 
. HEGDE ls 
KILI is 
. SETUP ls yy 
. SWRI _is leé 
. SWRLC ists 
SACTI ls is3 
. SAPTE ls e218 
. 25° TH ls i164 
.SAPTY ls 3284 
. SASTA is 
.SCATC ls 137 
.SCMTA ls 186 
- SOB25 ls 
. $0820 ls 
-$O1lV ls 
. SEOP ls £50 
SERFS is e918 
SERRT ls e232 
SMULT ls 
SPARE is 
SPOuE le 863155 
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MBINDEC-1i-D2VSE-8 VSvOl VIEDC GRAPHIC TEST PROGREM 
- C2-IUN-7E 00:00 CROSS REFERENCE TASLE -- MACRO NAMES 

. SRAND le = oESso 

. SRODE ls 

- $ROOT ls 34s¢ 

. SRERD te 3341 

. SRERL is 

. SSAVE is 

. $SB20 is 

. $S820 is 

.SS00F is srr 

.$SIZE is 

.$SPac ls 

. SSUPR is 

. SSWDO is 

.37RRP is SEL 

.37YPS is 

.STYFD ie 3087 
TY is 325 
STYP> is 3010 
$4006 ls 

1170 ls 


- MES. O02433E oot 
ERRORS --ETECTED: 5 
DEFAULT GLOBALS GENERATED: 0 
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; UBUD ial 0 
SSSBOSSE1 : 11 ii 11] guoaniulocactoaianidaassarutaernacaaauianicculeddasnninndteaa caeangat 





Sehyeseteeteeetetert 
L1ii1343 eeeeeee e@eseeeee 
ANH AMTTLII8 999 


Wdwlwes o aosesee LiZc2zz2 






eeseeseoaw 


———e www oe 


